Question

НАПИСАТЬ ПРОГРАММУ ВЫЧИСЛЕНИЯ ЗНАЧЕНИЯ ФУНКЦИИ

Y= {X^2, ЕСЛИ -2<=X, X<=2; 

      {4, В ОСТАЛЬНЫХ СЛУЧАЯХ

Answer 1

Program Pr1;
uses crt;
var x,y:integer;
Begin
clrscr;
writeln('Vvedite x');
readln(x);
if (x>=-2) and (x<=2) then y:=sqr(x)
else y:=4;
writeln(y);
end.