Предмет: Информатика,
автор: fsfddj
Вводится последовательность n из целых чисел. найти, сколько в ней нулей. Pascal, будьте добры.
Ответы
Автор ответа:
0
Попробуй:
("А" одно из чисел последовательности, а Q кол-во нулей)
Begin
For i:=1 to n do
Read(A);
If A=0 then inc(Q);
Write(Q);
End.
("А" одно из чисел последовательности, а Q кол-во нулей)
Begin
For i:=1 to n do
Read(A);
If A=0 then inc(Q);
Write(Q);
End.
Похожие вопросы
Предмет: Алгебра,
автор: kseniakolikova2007
Предмет: Литература,
автор: leonid89523934602
Предмет: Информатика,
автор: LaBokaDelakka
Предмет: Физика,
автор: edikibatov
Предмет: Биология,
автор: КатечкаЯ