Даны три числа. Написать программу, подсчитывающую количество чисел, равных 0 — QBasic(Бейсик)

CLS
INPUT n
INPUT l
INPUT fack
IF n = 0 THEN s = 1
IF l = 0 THEN s = s + 1
IF fack = 0 THEN s = s + 1
PRINT s

Leave a Comment