Помогите пожалуйста решить задачу по информатике:Вывести на экран квадраты и кубы всех нечётных чисел от 1 до 9.
Помогите пожалуйста решить задачу по информатике:
Вывести на экран квадраты и кубы всех нечётных чисел от 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.
Не нашли ответ?
Похожие вопросы