
Онуфрий
6 год назад
Составить алгоритм и написать решение задачи на Паскале: Сгенерировано целое число в диапазоне от 20 до 30. Найти диагональ квадрата с данной стороной.
ОТВЕТЫ

Бахрамей
Jul 4, 2019
Var a:integer;
x:real;
begin
a:=random(20,30);
x:=sqrt(sqr(a)+sqr(a));
writeln(сторона= ,a);
writeln(диагональ= ,x);
end.
x:real;
begin
a:=random(20,30);
x:=sqrt(sqr(a)+sqr(a));
writeln(сторона= ,a);
writeln(диагональ= ,x);
end.
155