Написать линейную программу ** языке Паскаль для нахождения гипотенузы треугольника и...

0 голосов
93 просмотров

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


Информатика (51 баллов) | 93 просмотров
Дано ответов: 2
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.

(1.4k баллов)
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

(194k баллов)