Подсчитать количество отрицательных чисел среди - вопрос №500987 от mazurok3 10.04.2023 20:47

Question

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

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