Написать программу на паскале. Вычислить значение Y по одной из формул. Y= X+a, если Xlt;10 X+b, если 10X23 X+, если Xgt;23

Question

Написать программу на паскале. Вычислить значение Y по одной из формул. Y= X+a, если X<10 X+b, если 10X23 X+, если X>23

Гость

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

Accepted Answer

Var x, a, b: real; begin readln(x, a, b); if x < 10 then x := x + a else if x > 23 then x := x + a * a else x := x + b; writeln(x); end.