Регистрация
настя7554
07.11.2020 00:03
Информатика
Есть ответ 👍

(1v0)v(0& 1) (0va)& (bv1) нужно

129
290
Посмотреть ответы 1

Ответы на вопрос:

marinafox253
marinafox253
4,8(12 оценок)

я вроде уже решал такую ту в условиях только добавилась фраза "по модулю". скорректировал программу с учетом уточнения в .

var

    a, n, i : integer;

begin

    repeat

        read(a);

   
    if (abs(a) < = 30000) and (a < > 0) then begin

            if (a mod 5 = 0) or (a mod 9 = 0) then n += 1;

            i += 1;

        end;

 
  until (a = 0) or (i = 1000);

    writeln(n);

end.

Популярно: Информатика