#include "pch.h"
#include <iostream>
using namespace std;
int main()
{
setlocale(LC_ALL, "rus");
const int dlinna = 14, dlinna2 = 9 ;
int arr[dlinna],chetnie = 0;
cout << "Введите значения массива на 14 элементов!" << endl;
for (int i = 0; i < dlinna; ) {
cin >> arr[i];
if (arr[i] % 2 == 0) {
chetnie++;
}
i++;
}
cout << "Количество четных элементов массива = " << chetnie << endl << endl;
int arr2[dlinna2];
int min= 2147483647, max=-2147483647;
cout << "Теперь введите значения массива на 9 элементов !" << endl;
for (int j = 0; j < dlinna2; j++) {
cin >> arr[j];
if(arr[j] < min) {
min = arr[j];
}if (arr[j] > max) {
max = arr[j];
}
}
cout << "Минимальный элемент массива = " << min << endl;
cout << "Максимальный элемент массива = " << max << endl;
}
1.
var n,i,a,m:integer;
begin
m:=-1;
write ('Введите количество чисел в последовательности: ');
readln(n);
for i:=1 to n do
begin
write ('Введите число (больше -1): ');
readln(a);
if (a mod 4 = 0) and (a>m) then m:=a
end;
write('Максимальное число, кратное 4, равно ',m);
end.
2.
var n,i,a,k:integer;
begin
write ('Введите количество чисел в последовательности: ');
readln(n);
for i:=1 to n do
begin
write ('Введите число: ');
readln(a);
if a mod 4 = 0 then k:=k+1
end;
write('Количество чисел, кратных 4, равно ',k);
end.
3.
var n,i,a,s:integer;
begin
write ('Введите количество чисел в последовательности: ');
readln(n);
for i:=1 to n do
begin
write ('Введите число: ');
readln(a);
if a mod 10 = 4 then s:=s+a
end;
write('Сумма чисел, оканчивающихся на 4, равна ',s);
end.