Question

Заданы два числа. Если их сумма больше восьми, увеличить эти два числа в 5 раз. Иначе уменьшить первое на 7, второе на 5( Паскаль)

Answer 1

PascalABC.NET 3.7:

• ##
• var (a, b) := ReadInteger2('Введите два числа:');
• (a, b) := a+b > 8 ? (a*5, b*5) : (a-7, b-5);
• Print('Результат:', a, b)