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

Question

Адельфина

28 августа, 08:37

+4

Ответы (1)

Знаете ответ на вопрос?

Паша · Answer 1

Var a:integer;

x:real;

begin

a:=random (20,30) ;

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

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

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

end.