Требуется использовать язык Паскаль Даны три целых числа A, B, C. Значения чисел вводятся...

Question

Требуется использовать язык Паскаль
Даны три целых числа A, B, C. Значения чисел вводятся с клавиатуры. Определить количество нулей среди данных чисел. Результат вывести на экран.

Comments

Если даны числа 102, 0 и 20, то количество нулей должно получиться 1 или 3?

---

Если строго по условию задачи то 1

Answer 1

Program nyli;
var  a, b, c, d: longint;
begin  d := 0;  Readln(a, b, c);  if a = 0 then d := d + 1;  if b = 0 then d := d + 1;  if c = 0 then d := d + 1;  Writeln('----------------');  Writeln(d);end.