Напишите на питоне!
Введите массив из 5 элементов с клавиатуры и найдите количество элементов, старшая цифра которых равна 8

арп8па8р8а8рп

Объяснение:

8пр88ра8пр

Объяснение:

var a: array [1..5] of integer; i, amount: integer;

begin

    read(a[1], a[2], a[3], a[4], a[5]);

    amount := 0;

    for i := 1 to 5 do

    begin

         while a[i] >= 10 do

         begin

              a[i] := a[i] div 10;

         end;

         if a[i] = 8

         then

             amount := amount + 1;

    end;

    writeln(amount);

end.

Подробнее - на -