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

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.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.