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

djkls djkls    2   28.07.2019 15:40    0

Ответы
Nadiya75 Nadiya75  03.10.2020 15:44
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
ПОКАЗАТЬ ОТВЕТЫ
Vlad15218 Vlad15218  03.10.2020 15:44
Если есть проблемы с отображением, смотрите снимок ответа.
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.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика