15 баллов!Нужно составить программу в Паскаль. Если сумма различных целых чисел х, у, z меньше 30, то заменить меньшее из у и х суммой двух других. В противном случае увеличить все числа на 10

Question

15 баллов!Нужно составить программу в Паскаль. Если сумма различных целых чисел х, у, z меньше 30, то заменить меньшее из у и х суммой двух других. В противном случае увеличить все числа на 10

15 баллов! Нужно составить программу в Паскаль. Если сумма различных целых чисел х, у, z меньше 30, то заменить меньшее из у и х суммой двух других. В противном случае увеличить все числа на 10

Гость

Ответ(ы) на вопрос:

Accepted Answer

var x,y,z:integer; begin write('x='); readln(x); write('y='); readln(y); write('z='); readln(z); if x+y+x<30 then if x