Составить алгоритм и написать решение задачи на Паскале: Сгенерировано целое число в диапазоне от 20 до 30. Найти диагональ квадрата с данной стороной.

Question

Татуля

19 марта, 06:06

+3

Ответы (1)

Знаете ответ?

Лизуня · Answer 1

Var a:integer;

x:real;

begin

a:=random (20,30) ;

x:=sqrt (sqr (a) + sqr (a)) ;

writeln ('сторона = ', a) ;

writeln ('диагональ = ', x) ;

end.