Предмет: Информатика, автор: devil48

Написать линейную программу на языке Паскаль для нахождения гипотенузы треугольника и реализовать её в среде Pascal ABC.NET
с=√а2 +b2(а и b в квадрате )

Ответы

Автор ответа: petyaGavrikov
0
var a,b,c:real;
begin
write('a = '); readln(a);
write('b = '); readln(b);
c:=sqrt(a*a+b*b);
writeln('c = ',c);
end.

Пример:
a = 3
b = 4
c = 5
Автор ответа: Интереcующийся
0
Если есть проблемы с отображением, смотрите снимок ответа.
program , hypotenuse;  \ 
var , a,b,c , : , real;  \ 
begin \ 
write('a= ,'); \ 
readln(a);  \ 
write('b = ,'); \ 
readln(b);
c := ,sqrt(a*a + b*b); \ 
writeln('c=,',c); \ 
end.
Похожие вопросы
Предмет: Математика, автор: Аноним
Предмет: Алгебра, автор: jimdshafil