1)
var
n,x,s,i : integer;
begin
s:=0;
write('Введите n: '); read(n);
for i:=1 to n do
begin
write('X - ', i, ' = '); read(x);
if x mod 10 = 9 then
s:=s+n;
end;
writeln('Сумма с 9 на конце = ', s);
end.
2)
var
n,i,max,x : integer;
begin
max:=0;
write('Введите n: '); read(n);
for i:=1 to n do
begin
if (x > max) and (x mod 5 = 0) then
max:=x;
write('X - ',i,' = '); read(x);
end;
writeln('Максимальное, кратное 5 = ', max);
end.
3)
var
a,b,i : integer;
begin
write('a = '); read(a);
write('b = '); read(b);
for i:=a to b do
begin
if (i mod 4 = 0) and (i mod 6 <> 0) then
writeln(i);
end;
end.
a = [int(i) for i in input("Список: ").split()] #Вводится через пробел
b = int(input("a = "))
bb = int(input("b = "))
c = []
d = []
s = []
e = []
f = []
print("Количество значений списка:",len(a))
print("Среднее значение списка:",sum(a)/len(a))
print("Сумма всех элементов списка:", sum(a))
for i in a:
if i==0:
c+=[i]
if i==b:
d+=[i]
if i>b:
s+=[i]
if i<0:
e+=[i]
if i>0:
f+=[i]
print("Количество нулевых элементов:",len(c))
print("Количество чисел а:",len(d))
print("Максимальный и минимальный элемент списка:",max(a),min(a))
print("Количество положительных элементов:",len(f))
print("Количество отрицательных элементов:",len(e))
print("Количество элементов крупнее числа b:",len(s))
