Задача 1 У масиві, що містить позитивні і негативні цілі числа, обчислити суму парних позитивних елементів. {10, -5. 25. 68. -91. 34. 25. 15.-87. 92. 86. 54. -85. 91. 78. 12. 31. 64}
Задача 2 Знайти в масиві ті елементи, значення яких менше середнього арифметичного, взятого від всіх елементів масиву.
довжина масиву не менше 10 елементів.
Задача 3 Стиснути масив, видаливши з нього всі елементи, величина яких знаходиться в інтервалі [а, b]. Вивільнені в кінці масиву елементи заповнити нулями.
а та b крайні значення інтервалу вводяться користувачем з клавіатури. довжина масиву не менше 10 елементів.
Задача 4 У масиві знайти елементи, які в ньому зустрічаються тільки найбільшу кількість разів, і вивести їх на екран. Тобто знайти і вивести елементи повторюється найбільшу кількість разів в масиві.
Допустим, массив уже задан, поэтому его ввод писать не буду. Kol - количество элементов массива
var
mas, mas_ob: array[0..999] of integer;
i, kol_null, sum, sum_nech, sum_ch, pp, i1, kol, max: integer;
begin
kol_null := 0;
sum := 0;
sum_nech := 0;
sum_ch := 0;
i1 := 0;
max := -10000;
for i := 0 to kol do
begin
if mas[i] <> 0 then kol_null += 1; //2
sum += mas[i]; //3
if mas[i] mod 2 <> 0 then sum_nech += mas[i];//4
if mas[i] mod 2 = 0 then sum_ch += mas[i]; //5
if mas[i] < 0 then mas[i] := abs(mas[i]); //6
if mas[i] mod 21 = 0 then mas[i] := 1; //7
if mas[i] > max then max := mas[i]; //11
end;
pp := mas[0];//8
mas[0] := mas[kol]; //8
mas[kol] := pp;//8
for i := kol downto 0 do //10
begin
mas_ob[i] := mas[i];
i1 += 1;
end;
writeln('Количество ненулевых элементов: ', kol_null);
writeln('Сумма всех элеметов: ', sum);
writeln('Сумма нечетных элеметов: ', sum_nech);
writeln('Сумма четных элеметов: ', sum_ch);
writeln('Максимальный элемент: ', max);
end.
#include <iostream>
#include <iomanip>
using namespace std;
int main()
{
double a, b, x, y;
cout << setw(10) << "a" << setw(10) << "b" << setw(10) << "x" << setw(10) << "y\n";
for (a = 0; a <= 2.5; a += 0.5) {
for (b = -1.5; b <= 0; b += 0.5) {
x = (2 * b + 0.3) / (a + b);
if (x >= -0.5)
y = b / sqrt(x + 5);
else
y = a / sqrt(x + 5);
cout << fixed << setw(10) << setprecision(3) << a;
cout << fixed << setw(10) << setprecision(3) << b;
cout << fixed << setw(10) << setprecision(3) << x;
cout << fixed << setw(10) << setprecision(3) << y;
cout << "\n";
//cout << fixed << setw(15) << setprecision(3) << a << " " << b << " " << x << " " << y << "\n";
}
}
}
Объяснение: