Дано натуральное число n . Получите наименьшее натуральное число вида m2, превосходящее n.
программа в паскле
Если я правильно понял суть задания
var n,m:inreger;
begin
readln(n);
m:=n+1;
writeln(m);
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Если я правильно понял суть задания
var n,m:inreger;
begin
readln(n);
m:=n+1;
writeln(m);
end.