Очень Запиши результаты выполнения операций">

#Python

#ответ B:

n = 1

num = []

while n != 0:

   n = int(input("Введите число : "))

   if n != 0:

       num.append(n)

num3 = []

for n in num:

   if int(n) % 3 == 0:

       num3.append(n)

print("Макс :", max(num3), " Мин :", min(num3))

#ответ C:

n = 1

num = []

while n != 0:

   n = int(input("Введите число : "))

   if n != 0 and len(str(n)) == 2:

       num.append(n)

num6 = []

for n in num:

   if int(n) % 10 == 6:

       num6.append(n)

if  num6 == True:

   print("Макс : ", max(num6))

else:

   print("Нет такого число!")

Объяснение:

Turbo Pascal
USES CRT;
VAR A:array[1..100] of integer;   
        i,n,summa:integer;

BEGIN
CLRSCR;
Randomize;

  {Проверяем на размер массива, чтобы не превышал 100}
   Repeat   
      Writeln('Введите размер массива до 100');   
      Readln(n);
   Until n<=100;

{Заполняем массив случайными числами от -50 до 100}
   For i:=1 to n do   
      begin     
         A[i]:=-50+Random(100);     
         Write(A[i],'  ');   
      end;

   summa:=0;

{Находим отрицательные элементы массива и складываем}
   For i:=1 to n do   
      if A[i]<0 then summa:=summa+A[i];

   Writeln;
   Writeln('Сумма отрицательных элементов массива  = ',summa);

READLN;
END.