program number1;
var a: array [1..5] of integer;
i,min,max: integer;
Begin
writeln('Введите 5 значений массива');
for i:=1 to 5 do
readln(a[i]);
min:=a[1];
max:=a[1];
for i:=1 to 5 do
Begin
if (a[i]>=max) then max:=a[i];
if (a[i]<=min) then min:=a[i];
End;
for i:=1 to 5 do
Begin
if max=a[i] then
Begin
writeln('Максимальное значение: ',a[i],' [',i,']');
max:=a[i];
End;
if min=a[i] then
Begin
writeln('Минимальное значение: ',a[i],' [',i,']');
min:=a[i];
End;
End;
writeln('Среднее арифметическое: ',(min+max)/2);
End.
//1
#include <iostream>
using namespace std;
signed main() {
int N, pr = 1;
cin >> N;
N = abs(N);
if ((N % 10 * (N / 10) % 10 * N / 100) > 10 and (N % 10 * (N / 10) % 10 * N / 100) < 100)
cout << "YES";
else
cout << "NO";
return 0;
}
//2
#include <iostream>
using namespace std;
signed main() {
setlocale(LC_ALL, "Rus");
int N;
cin >> N;
N = abs(N);
while (N > 0) {
if ((N % 10) % 2 == 0)
cout << N % 10 << " - четное\n";
else
cout << N % 10 << " - нечетное\n";
N /= 10;
}
return 0;
}
//3
#include <iostream>
using namespace std;
signed main() {
setlocale(LC_ALL, "Rus");
int a, b;
cin >> a >> b;
if (a % b == 0)
cout << "Число " << a << " делится без остатка на число " << b;
else
cout << "Число " << a << " не делится без остатка на число " << b;
return 0;
}