Документ взят из кэша поисковой машины. Адрес оригинального документа : http://us.chem.msu.su/courseware/pascal/array_examples.htm
Дата изменения: Sun Nov 22 21:30:50 1998
Дата индексирования: Sat Apr 9 22:52:12 2016
Кодировка: Windows-1251
Программирование и решение задач на ЭВМ - Справочник
Программирование и решение задач на ЭВМ
Справочник

Основные темы
Примеры программ
Приложения

Примеры фрагментов программ с использованием массивов переменных


Использование массива переменных для хранения вычисляемых значений функции:
. . .
read(x0,dx);
for i:=1 to 20 do Y[i]:=func(x0+i*dx); . . .

Поиск минимального элемента числового массива.
Идея соответствующего алгоритма проста. Предположим, что таким элементом является первый, и запомним его. Затем будем сравнивать его с остальными. Если по мере просмотра обнаружится меньший - заменим запомненный на вновь найденный и в дальнейшем будем сравнивать уже с ним. На Паскале это можно записать так:

. . .
Ymin := Y[0];
for i:=1 to N do
if Y[i]< Ymin then Ymin:=Y[i];
. . .

Считывание данных в массив переменных.
Для обработки большого объема информации с использованием некоторой математической модели организуется хранение данных в массивах переменных. Считывание данных в массив обычно осуществляется через цикл for, например:

var
n,i: integer;
X,Y: array [1..100] of real;
. . .
. . .
begin
writeln ('Задайте количество элементов в массивах X и Y',
        '(не более 100)');
readln(n);
for i:=1 to n do
readln(X[I],Y[I]);
. . .

Пример программы на считывание чисел в массив из внешнего файла данных и поиск среди них наибольшего по абсолютному значению.


Вверх страницы
Вернуться на главную страницу