Для четырех произвольных чисел, введенных с клавиатуры…

Для четырех произвольных чисел, введенных с клавиатуры, выведите на экран соответствующиерезультаты. Если первое число четно, то выведите сумму этих четырех чисел. Если второе и третье числа положительны, то выведите их среднее арифметическое. Если выполняются одновременно два перечисленных выше условия, то выведите все четыре числа без изменения. Иначе, выведите числа, противоположные исходным. Составьте соответствующие отладочные примеры и проверьте работу каждой программы.

в избранное

meretdurdy

21 августа 2022

Var a, b, c, d: integer; begin read (a, b, c, d); if a mod 2=0 then writeln (a+b+c+d); if (b > 0) and (c > 0) then writeln (a+b+c+d) / 4); if (a mod 2=0) and (b > 0) and (c > 0) then writeln (a, ', b, ', c, ', d) else writeln (-a, ', -b, ', -c, ', -d); end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Знаете другой ответ?