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

Question

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

tanecka2 · Answer

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 ( Сумма нечетная );...

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

Популярные вопросы