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

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

По блок-схеме сначала задаётся индекс $$i := 1$$, затем пока $$i \le 10$$, выполняется ввод элемента массива $$a[i]$$ и увеличение индекса на 1. Соответствующая программа на Паскале:

program Z_68;
var
  a: array [1..10] of integer;
  i: integer;
begin
  i := 1;
  while i <= 10 do
  begin
    readln(a[i]);
    i := i + 1;
  end;
end.