ВУЗ:
Составители:
{2} for i:=2 to n do
{3} if A[i]>max then max:=A[i];
…
Задача 7: Найти min и max значения элементов массива.
Фрагмент программы:
Var {дополнительные переменные}
max,min:integer;{значение максимального и минимального
элементов массива}
…
Begin
...
max:=A[1];
min:=A[1];
for i:=2 to n do
if A[i]>max then max:=A[i]
else if A[i]<min then min:=A[i];
…
Подсчет количества элементов, удовлетворяющих заданному
условию
Задача 8: Подсчитать, сколько раз в массиве встречается
элемент, равный 10.
Задача решается по следующему алгоритму:
1. Количество нужных элементов k=0.
2. Проходим по всем элементам массива,
3. И если очередной элемент массива равен 10,
4. Тогда увеличиваем k (количество элементов равных 10) на 1.
Фрагмент программы:
Var {дополнительные переменные}
k:integer; {количество элементов, равных 10}
…
Begin
...
{1} k:=0;
{2} for i:=1 to n do
{3} if A[i]=10
{4} then k:=k+1;
…
Страницы
- « первая
- ‹ предыдущая
- …
- 13
- 14
- 15
- 16
- 17
- …
- следующая ›
- последняя »
