51

Подсчитать количество отрицательных чисел среди чисел а, б, с. (программирование…

19 апреля 2023

Подсчитать количество отрицательных чисел среди чисел а, б, с. (программирование ветвящихсяалгоритмов)

категория: информатика

33

var a, b, c: real; count: byte; begin read (a, b, c); count: =0; if a < 0 then inc (count); if b < 0 then inc (count); if c < 0 then inc (count); wrireln (count); end.

Знаете ответ?

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...