7.10. Фрагменты операций с одномерными массивами

Операция

Фрагмент программы

1. Ввод элементов массива

for i:=1 to n do

read(A[i]);

7. Вывод элементов массива

for i:=1 to n do

writeln(A[i]);

8. Замена элементов массива на величину z

for i:=1 to n do

A[i]:=z;

9. Увеличение элементов массива на величину z

(аналогично уменьшение, умножение, деление)

for i:=1 to n do

A[i]:=A[i]+z;

10. Вычисление элементов массива B прибавлением к элементам массива A величины z

(аналогично вычитанием, умножением, делением)

for i:=1 to n do

B[i]:=A[i]+z;

11. Вычисление индекса максимального элемента i_max

(аналогично минимального)

max:=A[1];

imax:=1;

for i:=2 to n do

if A[i]>max then

begin

max:=A[i];

imax:=i;

end;

12. Вывод индексов для части элементов

for i:=1 to n do

if A[i]>z then

writeln(i);

13. Перестановка 1-го и 2-го элементов одномерного массива

c:=A[1];

A[1]:=A[2];

A[2]:=c;