Помогите пожалуйста решить задачу по информатике:
Вывести на экран квадраты и кубы всех нечётных чисел от 1 до 9.

1

Ответы и объяснения

2014-03-08T08:17:37+04:00
var
  i: byte;
begin
  for i := 1 to 9 do
    writeln(String.Format('{0:00} | {1:00} | {2:000}', i, sqr(i), sqr(i) * sqr(i) / i));
end.