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

0 голосов
83 просмотров

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


вопрос по Информатика от
Дан 1 ответ
0 голосов
Правильный ответ

var i:integer;

BEGIN

  for i:=1 to 1000 do

    if i mod 2 = 1 then writeln(i*i*i);

END.

ответ от