Дана функция f(x)=3x^2+4x-5. вычислить f(4)+f(-5). решить в паскале

Программа может выглядеть так:

program Func;
 uses Crt;
 var  a,b: integer;
      rez, fa, fb: integer;
begin                       ;
 ClrScr;
 a:=4;
 b:=-5;
 fa:=3*sqr(a)+4*a-5;
 fb:=3*sqr(b)+4*b-5;
 Rez:=fa+fb;
 WriteLn('f(4)=', fa);
 WriteLn('f(5)=', fb);
 WriteLn('f(4)+f(5)=', Rez);
 ReadLn;
end.
                             ,