EvilAdmin | Дата: Среда, 18.02.2015, 12:13 | Сообщение # 1 |
![EvilAdmin](/avatar/44/593930.jpg) Учитель
Группа: Администраторы
Сообщений: 310
Репутация: 0
Статус: Offline
| Заполнение массива
Заполнять массив, можно либо вводя значение каждого элемента с клавиатуры, либо присваивая каждому элементу определённую величину. При этом может использоваться цикл с параметром. Например, для ввода с клавиатуры в значений элементов описанного выше массива a используется следующий цикл спараметром:
for i:=1 to 10 do read (a);
Задавать значения элементов массива можно с помощью оператора присваивания. Например:
for i:=1 to 10 do a:=i;
В следующем фрагменте программы организовано заполнение целочисленного массива a, состоящего из 10 элементов, случайными числами,значение которых изменяется в диапазоне от 0 до 49:
randomize; for i:=1 to 10 do a:=random(50);
Вывод массива
Элементы массива можно вывести в строку, разделив их пробелом:
for i:=1 to 10 do write (a,’ ‘);
Для удобства можно ещё вывести информацию об элементе массива:
for i:=1 to 10 do writeln (‘a[‘,i,’]=’,a);
Пример программы:
Вычисление суммы элементов массива
Рассматривая код для вывода массива предоставленного выше, попробуйте дополнить программу, чтобы вычислялась сумма элементов массива и результат суммирования выводился на экран. Для этого используй этот фрагмент кода:
s:=0; for i:=1 to n do s:=s+a;
|
|
| |