Вот держите )(на всякий s=42
n = int(input('Введите целое положительное число: '))
sum = 0 # сумма цифр
sumOddDigit = 0 # сумма нечетных цифр
oddNumCounter = 0 # количество нечетных цифр
while n > 0:
lastDigit = n % 10
sum += lastDigit
sumOddDigit += (lastDigit % 2) * lastDigit
oddNumCounter += lastDigit % 2
n //= 10
print('Сумма цифр: ' + str(sum))
print('Среднее арифметическое нечетных цифр: ' + str(sumOddDigit/oddNumCounter))
Var
a:array[1..10] of integer;
i, k:integer;
begin
for i:=1 to 10 do begin
write(i,'-й элемент: ');
readln(a[i]);
end;
k:=0;
for i:=1 to 10 do
if a[i]>50 and a[i] mod 3 = 0 then
k:=k+1;
writeln(k,' чисел');
end.
Var n:longint;
c:real;
begin
write ('N = ');
readln(n);
if (n mod 2 = 0) and (n>0) then c:=n/4 else
if (n mod 2 = 0) and (n<0) then c:=n*5 else
if (n mod = 1) then c:=sqr(n);
write (c:0:2);
end.
400, 542, 1112, 1157, 1516