Предмет: Информатика, автор: riiriririririrri

помогите пожалуйста
нужно составить программу​

Приложения:

Ответы

Автор ответа: merkkaa
1

#Python

count = 0

while 1:

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

   if a == 0:

       break

   else:

       if a % 7 == 0:

           count +=1

print(f"{count} - чисел кратных 7")

Приложения:
Автор ответа: lenyashastin
1

Решение:

var a,b,c:integer;

begin

readln(a);

b:=1;

while a<>0 do begin

readln(a);

if (a mod 7 = 0) and (a mod 2 <> 0) then

b:=b+1;

end;

writeln (b);

end.

Похожие вопросы
Предмет: Геометрия, автор: vikavanisova
Предмет: Алгебра, автор: ilnu1999