Есть ответ 👍

4.Задача «Список квадратов». По данному целому числу N распечатайте все квадраты натуральных чисел, не превосходящие N, в порядке убывание.​

185
323
Посмотреть ответы 1

Ответы на вопрос:


var x,y: real;

begin

readln(x);

if x< 0 then writeln('oshibka') else begin y: =sqrt(x); writeln('y=',y); end;

end.

Популярно: Информатика