Дано масив цілих чисел А із 10 елементів, заповнений за допомогою ГВЧ в діапазоні від 20 до 40. Знайти суму елементів масиву А і добуток елементів кратних 5.

Розв’язування задачі на мові Паскаль:

Розкриємо ідею найпростішого способу знаходження максимального значення у масиві (мінімальне значення можна знайти аналогічним способом). Введемо позначення змінних для знаходження максимального і мінімального значення елементу масиву:

Max – максимальний елемент;

Min –мінімальний елемент.

Деякій змінній, скажімо, змінній max, присвоюється значення першого елемента масиву. Після цього виконується цикл, що послідовно порівнює значення кожного елемента, починаючи з другого, із поточним значенням змінної max. Якщо значення елемента перевищує max, воно присвоюється змінній max. Отже, на кожній ітерації циклу у змінній max міститиметься найбільше значення з пройденої частини масиву, а по завершенні циклу змінна max зберігатиме максимальне значення в усьому масиві.

	Пошук найменшого (найбільшого) елемента в масиві
1. Задати початкові значення змінних max, min: max:=a[1]; min=a[1]; 2. У циклі задати умову пошуку max (min) елементів: if a[i] > max then max:=a[i] if a[i] < min then min:=a[i] 3. Закривши цикл, вивести результат обчислення max (min): writeln (‘Max =’, Max); writeln (‘Min =’, Min);

Під час пошуку найбільшого або найменшого елемента масиву може виникнути потреба у визначенні його індексу. Значення індексу, як правило, використовується при подальшій перестановці елементів масиву, їх видаленні тощо. Для розв'язання цієї задачі введемо позначення змінних:

Nmax– індекс максимальний елемент;

Nmin –індексмінімальний елемент.

	Пошук найбільшого елементу масиву та його індексу
1. Задати початкові значення змінних та їх індексів: max:=a[1]; Nmax:=1; 2. У циклі задати умову пошуку max елементу: if a[i] > max then begin max:=a[i]; Nmax:=i; end; 3. Закривши цикл, вивести результат обчислення: writeln (‘Максимальним є елемент A[’, Nmax, ‘] =’, Max:6:2);

Приклад 2.