Pascal Given n is a natural number. Display all numbers whose cubes do not exceed n.

The program will be written in the PascalABC.net programming language;

We will consider numbers using the for loop counter, since the loop step is 1.

begin // start of the program;

var n: = readinteger; // initialize the variable and read the value from the keyboard;

for var i: = 1 to n do // consideration of numbers using the counter of this cycle;

if i * i * i <n then // check the condition;

println (i) else

break; // if the cubes began to exceed the specified value, then you can forcibly exit the loop;