Viết chương trình nhập 3 số là 3 cạnh của tam giác, kiểm tra xem có phải là tam giác vuông không? 26/07/2021 Bởi Alaia Viết chương trình nhập 3 số là 3 cạnh của tam giác, kiểm tra xem có phải là tam giác vuông không?
program tam-giac; use crt; var m,n,z: integer; begin write (‘n=’);readln(n); write (‘m=’); readln(m); write (‘z=’);readln(z); if (m*m+n*n=z*z) or (z*z+m*m=n*n) or (z*z+n*n=m*m) then write (‘ la tam giac vuong’) else write (‘ ko la tam giac vuong’); readln; end. Bình luận
B1:Nhập 3 cạnh a,b,c B2: kiểm tra if (a*a+b*b=c*c) or (a*a*c*c=b*b) or (b*b+c*c=a*a) then write(‘la 3 canh cua tam giac vuong) ngược lại thì write(‘Khong la 3 canh cua tam giac vuong’); B3: Kết thúc. Bình luận
program tam-giac;
use crt;
var m,n,z: integer;
begin
write (‘n=’);readln(n);
write (‘m=’); readln(m);
write (‘z=’);readln(z);
if (m*m+n*n=z*z) or (z*z+m*m=n*n) or (z*z+n*n=m*m) then write (‘ la tam giac vuong’) else write (‘ ko la tam giac vuong’);
readln;
end.
B1:Nhập 3 cạnh a,b,c
B2: kiểm tra
if (a*a+b*b=c*c) or (a*a*c*c=b*b) or (b*b+c*c=a*a) then write(‘la 3 canh cua tam giac vuong) ngược lại thì write(‘Khong la 3 canh cua tam giac vuong’);
B3: Kết thúc.