Question

Возвести в куб нечётные числа от 1 до 20 (В Паскале)

Answer 1

var
num: Integer;
begin
for num := 1 to 20 do if num mod 2 <> 0 then write( power(num,3):0:0, ' ');
end.

Answer 2

Может уже разрешили сейчас, не знаю. Раньше за это давали предупреждение.

Answer 3

ну к сожалению приложение в коммент не запишешь

Answer 4

в решениях ни за что

Answer 5

Я понимаю. Сам был недоволен этим. А что делать?

Answer 6

не знаю