Question

СРОЧНО ПРОШУ составте програму у= х в квадрате , -2<=х<=2
4, в противном случае

Answer 1

var
    x: real;

begin
    readln(x);
    if abs(x) <= 2 then
        writeln('y=', x * x)
    else writeln('y=', 4);
end.