Дан массив целых чисел не используя другие массивы переставьте его элементы в обратном порядке.Помогите где ошибка программа не работает
Нет комментариев
Ответы
Гость program ms;const n=10;varx:array[1..n] of integer;i,c:integer;beginwriteln('ishodnmassiv');for i:=1 ton do read(x[i]);writeln();for i:=1 ton div 2 do beginc:= x[i];x[i]:=x[n+1-i];x[n+1-i]:=c;end;writeln('obratnyimassiv');for i:=1 ton do write(x[i],' ');end.
![program ms;const n=10;varx:array[1..n] of integer;i,c:integ](https://ru-static.z-dn.net/files/d2c/f5324bb64c185cb93b499e10693bdde1.png "program ms;const n=10;varx:array[1..n] of integer;i,c:integ")
Нет комментариев
Список предметов
