• Вопрос по информатике:

    В последовательности четырех целых чисел, заданных с клавиатуры, найти количество нулей.

    • Автор:

      mcneil
  • большое спасибо))

    • Отвечал:

      amyyvdu
    • 0

    program raf105;

    var i,a,nul: integer;

    begin

    writeln('Введите 4 числа по очереди:');

    for i:=1 to 4 do

    begin

     readln(a);

     if a = 0

       then nul:= nul+1;

    end;

    writeln('Количество нулей: ',nul);

    end.

    PascalABC 3.4.2

    • Отвечал:

      deannoib
    • 0

    Ответов нет, но ты это испарвиш!

Еще 4 ненужных тебе вопроса, но это важно для поиска