Упр.3.70 ГДЗ Сборник упражнений Босова 7-9 класс (Информатика)

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

По блок-схеме видно, что сначала переменной i присваивается значение 1, затем в цикле с постусловием последовательно вводятся элементы массива a[i], после чего i увеличивается на 1. Цикл повторяется, пока $$i \le 10$$.

var
a: array [1..10] of integer;
i: integer;
begin
  i := 1;
  repeat
    read(a[i]);
    i := i + 1
  until i > 10;
end.