Теперь Кью работает в режиме чтения

Мы сохранили весь контент, но добавить что-то новое уже нельзя

Программирование, помогите пожалуйста)

составить программу в среде программирования Pascal ABC для решения следующей задачи.

Вариант 4

Написать программу, которая выводит таблицу квадратов первых n целых положительных нечетных чисел. Количество чисел должно вводиться во время работы программы.

Таблица квадратов нечетных чисел

Введите размер таблицы -> 5

Число Квадрат

- - - - - - - - - - - - - - - - -

1 1

3 9

… …

9 81

- - - - - - - - - - - - - - - - -

Pascal abc
Дмитрий
  ·   · 287
Автор видеоуроков для подготовки к ЕГЭ по...  · 11 дек 2018  · youtube.com/c/ИнформатикБУ

var

i, n: integer;

begin

readln(n);

for i:=0 to n-1 do

writeln(2*i+1, ' ', sqr(2*i+1));

end.