Menghitung Panjang Sisi miring Segitiga Siku-siku

Keterangan :

a = panjang sisi a

b = panjang sisi b

c = pamjang sisi miring c
Panjang sisi miring segitiga siku-siku (c) = sqrt [(axa) + (bxb)]

program menghitung_panjang_sisimiring_sikusiku;
uses windos,wincrt;
var
a,b,c:real;
ch:char;
begin
clrscr;
write('masukan nilai a: ');
readln(a);
write('masukan nilai b: ');
readln(b);
c:=sqrt((a*a)+(b*b));
writeln('panjang sisi miring=',c:10:2,'cm2');
ch:=readkey;
end.