var x,y:real;
begin
write('x=');read(x);
if (3*sqr(x)-5*x-12)>0 then begin writeln('підкореневий вираз позитивно'); write('значени=',3*sqr(x)-5*x-12);end;
if (3*sqr(x)-5*x-12)<0 then  writeln('вираз немає значення');
end.