Операция
| Фрагмент программы
|
1. Ввод элементов массива
| for i:=1 to n do
read(A[i]);
|
2. Вывод элементов массива
| for i:=1 to n do
writeln(A[i]);
|
3. Замена элементов массива на величину z
| for i:=1 to n do
A[i]:=z;
|
4. Увеличение элементов массива на величину z
(аналогично уменьшение, умножение, деление)
| for i:=1 to n do
A[i]:=A[i]+z;
|
5. Вычисление элементов массива B прибавлением к элементам массива A величины z
(аналогично вычитанием, умножением, делением)
| for i:=1 to n do
B[i]:=A[i]+z;
|
6. Вычисление индекса максимального элемента imax
(аналогично минимального)
| max:=A[1];
imax:=1;
for i:=2 to n do
if A[i]>max then
begin
max:=A[i];
imax:=i;
end;
|
7. Вывод индексов для части элементов
| for i:=1 to n do
if A[i]>z then
writeln(i);
|
8. Перестановка 1-го и 2-го элементов одномерного массива
| c:=A[1];
A[1]:=A[2];
A[2]:=c;
|