Табулирование ф-ии

[Veroni4ka]

pascal
табличное задание функции "y(t)" (протабулировать фунуцию на интервале t Є [tнач, tкон] с шагом "h" и параметром a и b. Учесть наличие особой точки.)
y(t)= {at^2*ln(t)---------- -1<=t<=2
_____{1 ----------- t<-1
_____{e^at*cos(b*t) ---------- t>2

[Chudo4258]

e^at*cos(b*t) выражение не понятно, нужно расставить скобки.

readln(tn,tk,h,a,b);
writeln('x           |         y');
wrteln('--------------------')
while tn<=tk do
 begin
  if (tn>=-1)and(th<=2)and(tn<>0) then writeln(tn:5:2,'  |   ',a*sqr(tn)*ln(tn):10:5)
   else if tn<-1 then writeln(tn:5:2,'   |  ',1)
     else if tn>2 then writeln(tn:5:2,'   |  ',{непонятное выражение в точке tn})
       else if tn=0 then writeln(tn:5:2,'   |  значение ф-ции в этой точке не существует');
  tn:=tn+h;
 end;