Evaluare informatică
![Evaluare Informatică class=](https://ro-static.z-dn.net/files/d3f/e43358825f82bf2098f6712c79f29e23.png)
Răspuns:
1)
Program T;
var a,b,x,c,z:integer;
begin
readln(a,b,c,x);
z:=a*x*x+b*x*x+3*c;
writeln(z);
End.
4)
program T1;
begin
writeln(123456);
writeln(123);
writeln(123.02);
writeln('true');
end.