Program p1; var x,max:real; begin writeln('introduceti numarul x:'); readln(x); if x < 0 then begin writeln(x-2); end else begin writeln('max este:',x*x, ' , ' ,1/x); end; readln; end.
Cam asa ceva, l-am testat si totul lucreaza, sper ca te-am ajutat.
Vă mulțumim pentru vizita pe site-ul nostru dedicat Informatică. Sperăm că informațiile disponibile v-au fost utile și inspiraționale. Dacă aveți întrebări sau aveți nevoie de suport suplimentar, suntem aici pentru a vă ajuta. Ne face plăcere să vă revedem și vă invităm să adăugați site-ul nostru la favorite pentru acces rapid!