var a,b:integer;
ch:real;
begin
write('a=');readln(a);
write('b=');readln(b);
ch:=sqrt(a*a)+(b*b));
writeln(' Canh huyen cua tam giac vuong la: ',ch);
readln;
end.
Viết chương trình nhập vào 2 cạnh góc vuông a và b tính cạnh huyền của tam giác vuông - Tìm với Google
Cho tam giác vuông ABC. Hãy viết phương trình tính độ dài cạnh huyền của tam giác, với chiều dài hai cạnh bên là a, b được nhập từ bàn phím, làm tròn sau dấu phẩy sau 1 chữ số thập phân - Tin học Lớp 11 - Bài tập Tin học Lớp 11 - Giải bài tập Tin học Lớp 11 | Lazi.vn - Cộng đồng Tri thức & Giáo dục
program bai1;
var a,b:real;
begin
repeat
write('Nhap canh 1: ');
readln(a);
until a>0;
repeat
write('Nhap canh 2: ');
readln(b);
until b>0;
c:=sqrt(a*a+b*b);
if (a+b<c) or (a+c<b) or (c+b<a) then write('Khong co tam giac phu hop')
else write(c);
readln
end.