• Предмет: Информатика
  • Автор: nikushakalinina2005
  • Вопрос задан 3 года назад

Переведите программу из Паскаля в Питон
var numb,count,k:integer;
begin
for k:= 1 to 8 do
begin
readln(numb);
if (numb mod 10 = 4) and (numb mod 3 = 0) then
count:=count+1;
end;
writeln(count);
end.

Ответы

Ответ дал: surmo
1

Ответ:

ниже

Объяснение:

count=0

for i in range(1,8):

   numb=int(input())

   if numb%10==4 and numb%3 ==0:

       count+=1

print(count)

Вас заинтересует