Дано число n вывести на экран все числа,кубы которых не превышает n pascal

Франц11 Франц11    1   10.07.2019 14:20    0

Ответы
aryuna2003 aryuna2003  03.10.2020 00:15
Var
i,n:integer;
begin
readln(n);
for i:=1 to n do
if i*i*i<=n then
writeln(i);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика