👤
BeatriceGonsales
a fost răspuns

Va rog urgeent!!! Cei care se pricep la informatica!!!

Va Rog Urgeent Cei Care Se Pricep La Informatica class=
Va Rog Urgeent Cei Care Se Pricep La Informatica class=

Răspuns :

program functiebybeatrice:

var x,y:real;
begin
write('x=');readln (x);
if x<-5 then y:=sqr(x)+2*x+3 else if x>=2 then y:=sqr(x)*x-2 else y:=x+1;
writeln('y=', y:6:0);

end.
program realizat de beatrice:

 

Alte intrebari