uses PT4; var a:array[1…5] of integer; n,x:integer; begin Task(‘Array1’);
x:=1; readln(n); for var i:=1 to n do begin a[i]:=x+2; x+=2; end; print(a);
end.
uses PT4; var a:array[1…5] of integer; n,x:integer; begin Task(‘Array1’);
x:=1; readln(n); for var i:=1 to n do begin a[i]:=x+2; x+=2; end; print(a);
end.
у вас a:array[1…5]
n оказалось больше, чем 5.
Институт математики, механики и компьютерных наук ЮФУ, 2005–2021