Informatică, întrebare adresată de BeatriceGonsales, 9 ani în urmă

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

Anexe:

Răspunsuri la întrebare

Răspuns de Utilizator anonim
1
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:

 

BeatriceGonsales: :)
Alte întrebări interesante