Вопрос алгоритм вычисления суммы элементов одномерного массива
| Вычисление суммы значений элементов массива
| | Вычисление суммы значений n элементов одномерного массива А: s=a[1]+a[2]+…+a[n]
Комментарий:перед входом в цикл обнуляем переменную для вычисления суммы (s). В цикле, добавив к сумме значение элемента с номером 1 (при i=1), записываем полученное значение в ту же самую переменную s. Выполняя эту операцию nраз (при i=1, 2,…, n), после выхода из цикла получаем в переменной s значениеs=a[1]+a[2]+…+ a[n].
| s:=0;
For i:=1 to n do
s:=s+a[i];
Writeln(‘Сумма=’,s);
| | Вычисление суммы значений элементов одномерного массива А, удовлетворяющих некоторому условию
Комментарий:добавляем к сумме в цикле только те значения массива, которые удовлетворяют заданному условию.
| s:=0;
For i:=1 to n do
if условие then s:=s+a[i];
Writeln(‘Сумма=’,s);
| | Примеры:
|
| |
1. Вычисление суммы элементов массива А, значения которых больше 1 и меньше 3
|
s:=0;
For i:=1 to n do
if (a[i]>1) and (a[i]<3) then s:=s+a[i];
Writeln(‘Сумма=’,s);
| | 2. Вычисление суммы значений элементов массива А, целая часть которых делится на 2 без остатка
Комментарий: функция trunc вычисляет целую часть числа, являющегося значениемa[i]. При этом получается результат целого типа. Операция mod дает остаток от деления числа на 2. Если остаток равен 0, это означает, что число делится на 2 без остатка.
| s:=0;
For i:=1 to n do
if trunc(a[i]) mod 2=0 then s:=s+a[i];
Writeln(‘Сумма=’,s);
| | 3. Вычисление суммы значений элементов массива А, имеющих нечетные номера
Комментарий:добавляем к сумме значения только тех элементов, номера которых (i) при делении на 2 дают остаток, не равный 0 (остаток от деления в этом случае равен 1).
| s:=0;
For i:=1 to n do
if i mod 2 <> 0 then s:=s+a[i];
Writeln(‘Сумма=’,s);
| | 4. Вычисление суммы значений элементов массива А, имеющих номера 1,3,5,7 и т.д. доn
К началу страницы
| s:=0; i:=1;
While i<= n do
begin
s:=s+a[i];
i:=i+2
end;
Writeln(‘Сумма=’,s);
| | |
Вопрос алгоритм вычисления максимального элемента одномерного массива
| Вычисление наибольшего и наименьшего значений элементов массиве
| | Вычисление наибольшего значения среди всех элементов массива А и вывод на экран номеров элементов, равных по значению наибольшему элементу.
Комментарий:первоначально за наибольшее значение принимается значение элемента массива с номером 1. Затем в цикле по переменной i наибольшее значение (переменная max) сравнивается с каждым из элементов массива a[i]. Если при сравнении оказывается, что сравниваемый элемент массива имеет большее значение, чем max, то значение этого элемента принимается за наибольшее.
Для вывода на экран номеров элементов, равных по значению наибольшему (их может быть несколько), выполняется сравнение значения каждого элемента с найденным в предыдущем цикле наибольшим значением на совпадение. В случае совпадения значений на экран выводится номер элемента.
| max:=a[1];
For i:=2 to n do
if max < a[i] then max:= a[i];
Writeln(‘Наибольшее значение =’,max);
For i:=1 to n do
if max = a[i] then Writeln(‘Номерэлемента =’, i);
| | Вычисление наименьшего значения среди элементов массива А, имеющих нечетные номера.
| min:=a[1];
For i:=1 to n do
if (i mod 2=1) and (min > a[i])then min:= a[i];
Writeln(‘Наименьшее значение =’,min);
| | Вычисление наибольшего значения среди элементов массива А, имеющих значение в диапазоне от 1 до 10.
Комментарий:В первой части программы просматриваются элементы массива с целью найти хотя бы один элемент со значением в диапазоне от 1 до 10. Если такой элемент находится, то он принимается за начальное значение наибольшего элемента массива (max) и происходит выход их цикла. В противном случае значение max остается равным 0. В случае max=0 поиск наибольшего элемента не выполняется. Еслиmax не равен 0, то выполняется поиск наибольшего элемента по стандартной схеме.
К началу страницы
| max:=0;
For i:=1 to n do
if (a[i]>=1) and (a[i]=<10) then
begin
max:=a[i];
break;{выход их цикла}
end;
if max=0 then
Writeln(‘В массиве нет элементов в диапаз. от 1 до 10’)
else
For i:=1 to n do
if max < a[i] then max:= a[i];
Writeln(‘Наименьшее значение =’,min);
| | |
Композиция из абстрактных геометрических фигур Данная композиция состоит из линий, штриховки, абстрактных геометрических форм...
|
Важнейшие способы обработки и анализа рядов динамики Не во всех случаях эмпирические данные рядов динамики позволяют определить тенденцию изменения явления во времени...
|
ТЕОРЕТИЧЕСКАЯ МЕХАНИКА Статика является частью теоретической механики, изучающей условия, при которых тело находится под действием заданной системы сил...
|
Теория усилителей. Схема Основная масса современных аналоговых и аналого-цифровых электронных устройств выполняется на специализированных микросхемах...
|
Упражнение Джеффа. Это список вопросов или утверждений, отвечая на которые участник может раскрыть свой внутренний мир перед другими участниками и узнать о других участниках больше...
Влияние первой русской революции 1905-1907 гг. на Казахстан. Революция в России (1905-1907 гг.), дала первый толчок политическому пробуждению трудящихся Казахстана, развитию национально-освободительного рабочего движения против гнета. В Казахстане, находившемся далеко от политических центров Российской империи...
Виды сухожильных швов После выделения культи сухожилия и эвакуации гематомы приступают к восстановлению целостности сухожилия...
|
Сущность, виды и функции маркетинга персонала Перснал-маркетинг является новым понятием. В мировой практике маркетинга и управления персоналом он выделился в отдельное направление лишь в начале 90-х гг.XX века...
Разработка товарной и ценовой стратегии фирмы на российском рынке хлебопродуктов В начале 1994 г. английская фирма МОНО совместно с бельгийской ПЮРАТОС приняла решение о начале совместного проекта на российском рынке. Эти фирмы ведут деятельность в сопредельных сферах производства хлебопродуктов.
МОНО – крупнейший в Великобритании...
ОПРЕДЕЛЕНИЕ ЦЕНТРА ТЯЖЕСТИ ПЛОСКОЙ ФИГУРЫ Сила, с которой тело притягивается к Земле, называется силой тяжести...
|
|
