Предмет: Информатика,
автор: gugjhvhvvhvhugguuggu
НУ КТО-НИБУДЬ, МНЕ ДЕЙСТВИТЕЛЬНО ОЧЕНЬ НУЖНО
ОЧЕНЬ-ОЧЕНЬ СРОЧНО , ПОМОГИТЕ, УМОЛЯЮ
Вводится одномерный массив размерностью 40 для обработки данной программой. Что делает программа?
Program pr;
Var a: array [1..40] of integer;
i,p,n: integer;
begin
for i:=1 to 40 do
readln (a [i] ) ;
for i:=1 to 40 div 2 do
begin
p:=a[i] ;
a[i]:=a[n-i+1] ;
a[n-i+1]:=p;
end;
for i:=1 to n do
writeln (a [i] ) ;
end.
nazikmuz:
Хватит спамить заданием
Ответы
Автор ответа:
1
Ответ:
Меняет местами элементы массива, первый становится последним, последний первым, второй предпоследним а предпоследний вторым и т.д. после этого выводит новый массив, только там вверху нужно задать n:=40
Объяснение:
Похожие вопросы
Предмет: Русский язык,
автор: странныйкакос
Предмет: Русский язык,
автор: тим251
Предмет: Английский язык,
автор: оленька102
Предмет: Музыка,
автор: Lenivoe65