До типових завдань на використання одномірних масивів відносяться такі:
■ знаходження суми (добутку) елементів масиву;
■ визначення найбільшого (найменшого) елемента в масиві;
■ знаходження кількості елементів масиву, що задовольняють певним умовам;
■ упорядкування масиву в порядку зростання (зменшення) елементів.
Розглянемо тип завдання визначення найбільшого (найменшого)
елемента в масиві на наступному прикладі.
Приклад розв’язання задачі обробки одномірного масиву
Для сукупності 15 чисел x=(0.01; -27.3; 0; 1.25; -371; 0.5; -0.1; 1.2; -5;
-172.3; 19.1; -2.7; 43.51; 0; -0.02) знайти найменший елемент та його номер.
Скласти таблицю ідентифікаторів, блок-схему алгоритму та TP-програму для обробки одномірного масиву.
Текст програми
program UIPA;
uses crt;
Type
MAS=array[1..15] of real;
Var
x:MAS; i,n:integer;
min:real;
Begin
clrscr;
writeln('Введення елементів масиву);
for i:=1 to 15 do
begin
write('x[',i,']=');
readln(x[i]);
end;
min:=x[1];
n:=1;
for i:=1 to 15 do
begin
if x[i]<min then
begin min:=x[i]; n:=i; end;
end;
writeln('Виведення мінімального елементу', min:5:2,' ', ' Його номер:',n);
End.
Реакція ЕОМ
Введення елементів масиву
|
|
x[1]=0.01
|
|
x[2]=-27.3
|
|
x[3]=0
|
|
x[4]=1.25
|
|
x[5]=-371
|
|
x[6]=0.5
|
|
x[7]=-0.1
|
|
x[8]=1.2
|
|
x[9]=-5
|
|
x[10]=-172.3
|
|
x[11]=19.1
|
|
x[12]=-2.7
|
|
x[13]=43.
|
|
x[14]=0
|
|
x[15]=-0.02
|
|
Виведення мінімального елементу-371.00
| Його номер:5
|