Описать процедуру rectdiag(a, b, d), вычисляющую диагональ прямоугольника со сторонами a, b (a, b — входные, d — выходной параметр вещественного типа).

sashadedarewa sashadedarewa    2   14.06.2019 07:20    1

Ответы
inessa2012 inessa2012  10.07.2020 23:11
Procedure RectDiag(a,b: real; var d: real);
begin
d:=sqrt(a*a+b*b);
end;

var a,b,d:real;
begin
read(a,b);
RectDiag(a,b,d);
writeln(d);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика