1. Вводится одномерный массив размерностью 40 для обработки данной программой. Что делает программа?
var a: array [1..40] of integer;
1, p, n: integer;
begin
for i:=1 to 40 do begin
a[i]:=10+random(90);
write(a[i]. '');
end;
writeln;
for n:=1 to 40 div 2 do
begin
p:=a[n]:
а[n]:=a[n+1]:
а[n+1]:=p;
end;
for i:=1 to 40 do
write(a[i]: ');
end
Данная программа осуществляет:
а) перестановку наибольшего и наименьшего
значений;
b) меняет местами значения элементов, стоящие на
чётных местах,
значениями элементов,
стоящими на нечетных местах;
с) меняет порядок следования значений элементов в
массиве на обратный порядок,
d) переставляет первый элемент в середину массива.
со

dimagolovin20    2   10.12.2020 11:07    152