На блок-схеме представлен алгоритм ввода массива из 10 целых чисел с помощью цикла с постусловием. Запишите соответствующую программу на языке Паскаль.
Var a: array[1..10] of integer; j: integer; begin j:=1; repeat readln(a[j]); j := j + 1; until j > 10; end.
