Algoritmo para ler os Catetos de um Triângulo Retângulo e Escrever a sua Hipotenusa.

// Faça um algoritmo para ler os catetos de um triângulo retângulo e escrever a sua hipotenusa.

program triangulo_retangulo;

var catetoA,catetoB,hipotenusa:real ;

begin

writeln('digite o cateto a');

readln(catetoA);

writeln('digite o cateto b');

readln(catetoB);

hipotenusa:=sqrt(catetoa*catetoa+catetob*catetob) ;

writeln('A hipotenusa e:',hipotenusa);

readln;

end.