Question

Найти сумму чисел x,y,z если они равны между собой,иначе найти их произведение

Answer 1

var x,y,z: integer;

begin

writeln ('Введите числа x,y,z ');

readln (x,y,z);

writeln ('Сумма равна ',x+y+z);

if ((x+y+z) mod 2 =0) then

       writeln ('Сумма четная,произведение равно ',x*y*z)

   else

       writeln ('Сумма нечетная');

Answer 2

Если числа x, y и z равны между собой, то сумма этих чисел будет равна 3x (или 3y, или 3z, потому что они равны).

Если числа различны, то их произведение будет равно xyz.

Итак, сумма или произведение зависит от того, равны ли эти числа между собой.