var
n, max, count, contrl, max2: integer;
begin
contrl := 0;
max := 0;
Writeln('Введите числа: ');
Readln(n);
while n <> 0 do
begin
Inc(count);
if n>max then begin max2:=max; max:=n end
else if n > max2 then max2 := n;
Read(n);
end;
max2*=max;
Writeln('Введите контрольное значение: ');
Read(contrl);
Writeln('Получено: ', count, ' чисел');
Writeln('Получено контрольное значение: ', contrl);
Writeln('Вычисленное контрольное значение:: ', max2);
if contrl = max then Writeln('Контроль пройден')
else Writeln('Контроль не пройден');
end.
var
n, max, count, contrl: integer;
begin
contrl := 0;
max := 0;
Writeln('Введите числа: ');
Readln(n);
while n <> 0 do
begin
Inc(count);
if (n mod 10 = 0) and (n > max) then max := n;
Read(n);
end;
Writeln('Введите контрольное значение: ');
Read(contrl);
Writeln('Получено: ', count, ' чисел');
Writeln('Получено контрольное значение: ', contrl);
Writeln('Вичисленное контрольное значение:: ', max);
if contrl = max then Writeln('Контроль пройден')
else Writeln('Контроль не пройден');
end.
ВСЕ элементы массивы вводятся на одной строке через пробел
4:
list = [int(i) for i in input().split()]
otr, pol, zero = 0, 0, 0
for i in list:
if i > 0:
pol += 1
elif i < 0:
otr += 1
else:
zero += 1
print(pol - otr, zero)
5:
длина массива это кол-во его элементов, поэтому я убрал ввод длины
list = [int(i) for i in input().split() if int(i) > 180]
print(sum(list) / len(list))
6:
list = [int(i) for i in input().split() if int(i) % 2 == 0 and int(i) % 10 == 6]
print(sum(list))