Нужно просто их посчитать
Там 6 едениц и 1 ноль
Бредовый конечно же вопрос, но мой ответ будет НЕТ
<em>// PascalABC.NET 3.3, сборка 1540 от 16.09.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var (a,b,c):=ReadReal3('Введите через пробел три числа:');
if a*b*c<>0 then Writeln((a+b+c)/3)
end.
<u>Пример</u>
Введите через пробел три числа: 6.3 -12 8.143
0.814333333333333
А)
X > Y ⇒ 2 > 2 ⇒ ложь (false)
б)
X > Y ⇒ 2 > -8 ⇒ истина (true)