Регистрация
Войти
Стать экспертом Правила
Информатика

Паскальь Даны три целых числа,вычислить их сумму и произведение и вывести их на печать,если сумма первых двух больше суммы вторых двух, иначе найти их среднее арифметическое и вывести их на печать .Решать через слова if и then и elseРебят прям ​

ОТВЕТЫ

var

       a, b, c: Integer;

begin

       Read (a, b, c);

       if (a + b) > (b + c) then

               Write (a + b + c, ' ', a * b * c)

       else

               Write ((a + b + c) / 3)

end.        

751
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам