Информатика, 9 класс

program z1; var a:array[1..12] of integer; i:integer; begin for i:=1 to 12 do a[i]:=random(11)-5; writeln('исходный массив: '); for i:=1 to 12 do writeln(a[i], ' '); end.