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