Вывести квадраты чисел от 30 до 10

Вывести квадраты чисел от 30 до 10
Гость
Ответ(ы) на вопрос:
Гость
var i :integer; begin  for i := 30 downto 10 do  writeln(sqr(i)); readln; end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы