Поменять первую половину элементов массива со второй половиной. В Паскаль АБС, составить программу! - вопрос №1276966

Вопрос задан анонимно
02.12.14
1 ответ

Лучший ответ по мнению автора

program p1;
const n=10;
var a:array[1..n] of integer;
i,k,temp:integer;
begin
writeln('vvedite massiv');
for i:=1 to n do readln(a[i]);
k:=n div 2;
for i:=1 to k do begin
 temp:=a[i];
a[i]:=a[n-i+1];
a[n-i+1]:=temp;
end;
for i:=1 to n do write(a[i]:5);
end.

03.12.14
Лучший ответ по мнению автора

Еva

от 100 p.
Читать ответы

1 1

Бесплатно
Читать ответы
Посмотреть всех экспертов из раздела Учеба и наука > Информатика
Пользуйтесь нашим приложением Доступно на Google Play Загрузите в App Store