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