На блок-схеме представлен алгоритм ввода массива из 10 целых чисел

---

---

Задание 69. На блок-схеме представлен алгоритм ввода массива из 10 целых чисел с помощью цикла с параметром. Запишите соответствующую программу на языке Паскаль.

---

Program zad_69_nica;
var
i: integer;
a: array[1..10] of integer;
begin
for i:=1 to 10 do
readln (a[i]);
end.

P.S. Если вы хотите проверить программу на правильную работу, вы можете добавить этот код в тело программы
for i:=1 to 10 do write ('a[', i, ']=', a[i], '; ')
и вам выведется введённый вами массив.