Подсчитать количество отрицательных чисел среди чисел - вопрос №500987 от millkawow 11.04.2022 08:44

Question

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

millkawow · Answer

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....