Спитоном. найдите количество положительных элементов в данном списке. входные данные вводится список чисел. все числа списка находятся на одной строке. выходные данные выведите ответ на . примеры входные данные 1 -2 3 -4 5 выходные данные 3

объяснение:

быстрая

Spisok = () kolvo=0 for i in spisok: if int(i)> 0: #сюда еще tab надо в начале строки kolvo+=1 #сюда тоже tab print(kolvo)

Var   i,d,dmin,dmax,kmax,imin,imax: integer;   n: longint; begin   write('введите натуральное число n: '); read(n);   dmin: =10; dmax: =-1; {больше большего и меньше меньшего}   i: =0;   repeat       d: =n mod 10; n: =n div 10; inc(i);       if dmax< d then begin dmax: =d; kmax: =1; imax: =i end       else if dmax=d then inc(kmax);       if dmin> d then begin dmin: =d; imin: =i end   until n=0;   writeln('минимальная цифра - ',dmin,' находится в разряде ',imin,'; ');   writeln('максимальная цифра - ',dmax,' находится в разряде ',imax,'; ');   writeln('сумма максимальной и минимальной цифры - ',dmin+dmax,'; ');   writeln('максимальная цифра встречается ',kmax,' раз(а); ');   write('минимальная цифра - ');   if (dmin mod 2)=0 then writeln('четная.')   else writeln('нечетная.') end. тестовое решение: введите натуральное число n: 388456 минимальная цифра - 3 находится в разряде 6; максимальная цифра - 8 находится в разряде 4; сумма максимальной и минимальной цифры - 11; максимальная цифра встречается 2 раз(а); минимальная цифра - нечетная.