Question

Realizati un algoritm pt calculul urmatoarei expresii:
{2-x,daca x<0 SI max(x*x,1/x), daca x> sau egal ca 0

Answer 1

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.