Question

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

Answer 1

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.