Вывести на экран квадратные кубы ничетных чисел. Прагрума PASCAL

Задание:

Вывести на экран квадратные кубы ничетных чисел. Прагрума PASCAL. Решите пожалуйста… зараниеспасибо)

Решение:

var i: integer; BEGIN for i: =1 to 1000 do if i mod 2=1 then writeln (i*i*i); END.

Знаете другой ответ?

Отправить свой ответ