
Благово
6 год назад
Дано натуральное число N,составить программу,котоая выводит на экран все натуральные числа,квадрат которых не больше чем N
ОТВЕТЫ

Мина
Jul 1, 2019
Var
x, n: integer;
begin
x := 1;
readln(n);
while x*x lt;= n do
begin
writeln(x);
x := x + 1;
end;
end.
x, n: integer;
begin
x := 1;
readln(n);
while x*x lt;= n do
begin
writeln(x);
x := x + 1;
end;
end.
213