4. Алгоритмізація і програмування задач з використанням одновимірних числових масивів
Приклад.
Розробити алгоритм та програму інвертування (дзеркального відображення) одновимірного цілочисельного масиву без використання додаткового масиву.
Текст програми
Program Pr_Vector;
Const n=7;
Var a:array[1..n] of integer;
i, c:integer;
BEGIN
Randomize;
For i:=1 to n do
Begin
a[i]:=random(20);
write(a[i]:4);
end; writeln;
for i:=1 to n div 2 do
Begin
c:=a[i]; a[i]:=a[n-i+1];
a[n-i+1]:=c;
end;
for i:=1 to n do write(a[i]:4,` `);
END.
Результат виконання програми 23 5 7 8 5 9 1
1 9 5 8 7 5 23
Індивідуальні завдання
Для масиву цілих чисел A(10) перевірити, чи є сума усіх його елементів невід’ємною.
Знайти та вивести максимальний та мінімальний елементи одновимірного цілочисельного масиву B(12).
Знайти та вивести суму і кількість усіх додатних елементів одновимірного цілочисельного масиву C(10).
Знайти та вивести суму і кількість усіх від’ємних елементів одновимірного цілочисельного масиву D(14).
Знайти та вивести середнє арифметичне від’ємних елементів одновимірного цілочисельного масиву F(18).
Знайти та вивести середнє арифметичне додатних елементів одновимірного цілочисельного масиву E(15).
Для масиву цілих чисел R(15) сформувати та вивести новий масив B, у який входять усі невід’ємні елементи першого масиву.
Для масиву цілих чисел T(10) сформувати та вивести новий масив S, у який входять усі додатні елементи першого масиву.
Сформувати та вивести масив Z, елементи якого розраховуються a[i] = (i-1)/(i+1) + sin(i-3)/(i+1), де i=1,2,...,n, (n задано). Знайти суму усіх додатних елементів a[i].
В масиві цілих чисел N(14) знайти суму усіх парних елементів, що стоять на непарних місцях.
В масиві цілих чисел M(14) знайти середнє арифметичне усіх парних елементів, що розміщуються на парних місцях.
В масиві цілих чисел G(12) знайти суму усіх непарних елементів, що стоять на парних місцях.
В масиві цілих чисел J(10) знайти середнє арифметичне усіх парних елементів, що розміщуються на непарних місцях.
В масиві цілих чисел K(15) знайти середнє арифметичне усіх додатніх елементів.
В масиві цілих чисел U(14) знайти середнє арифметичне усіх від’ємних елементів.
В масиві цілих чисел Y(17) знайти середнє арифметичне усіх елементів, розташованих між мінімальним та максимальним елементами.
Знайти та вивести кількість усіх ненульових елементів одновимірного цілочисельного масиву L(12).
Знайти та вивести кількість усіх нульових елементів одновимірного цілочисельного масиву P(15).
В масиві цілих чисел T(10) додатні елементи збільшити вдвічі, а від’ємні – зменшити вдвічі.
В масиві цілих чисел H(13) додатні елементи зменшити на число a, а від’ємні – подвоїти. Число a задати самостійно.
Вивести на екран всі елементи масиву F(13), які розташовані до першого нульового елемента.
Вивести на екран всі елементи масиву S(15), які розташовані після останнього нульового елемента.
В масиві цілих чисел R(12) переставити місцями максимальний та мінімальний елементи.
В масиві цілих чисел S(17) визначити та вивести на екран індекс останнього елемента, що дорівнює заданому значенню.
В масиві цілих чисел J(12) визначити та вивести на екран індекс першого елемента, що дорівнює заданому значенню.
В масиві дійсних чисел T(12) знайти середнє арифметичне максимального та мінімального елементів.
В масиві цілих чисел R(10) визначити мінімальний елемент та поміняти його місцями з першим нульовим елементом.
В масиві цілих чисел E(17) визначити максимальний елемент та поміняти його місцями з останнім нульовим елементом.
В масиві дійсних чисел D(13) додатні елементи поділити на останній елемент, а від’ємні – на перший елемент.
В масиві дійсних чисел R(15) додатні елементи збільшити на перший елемент, а від’ємні – зменшити на останній елемент.