Памогите сделать программу через программу Poscal ABC плиз срочно нужно !!! Увеличить Значения элементов массива на 1 (мне нужно полностью всю программу )
Program massiv;
var A:array [1..N] of real; N, i:integer;
begin
read(A[i]);
readln(N);
for i:=1 to N do
B[i]:=A[i]+1;
write(B[i]);
end.