В про­грам­ме опи­сан од­но­мер­ный це­ло­чис­лен­ный мас­сив с ин­дек­са­ми от 0 до 10. В при­ве­ден­ном ниже фраг­мен­те

Составим задачу на языке программирования PascalProgram massiv;uses crt;vara:array [0..10] of integer;k,i:integer;Beginfor i:=0 to 10 do A[10-i]:=i;k:=A[9];for i:=0 to 9 doA[10-i]:=A[9-i];A[1]:=k;For i:=0 to 10 dowrite(A[i]:4);writeln;readln;END.