Вычислить значение переменной z для значения а, равных 2,3,4....,12. z=3,5t^2-7cost+1,6 . t=sin(4a). Для выполнения организовать цикл с предусловием.Паскаль.

var a:integer;

t,z:real;

begin

a:=2;

while a<= 12 do

begin

t:=sin(4*a);

z:=3.5*sqr(t)-7*cos(t)+1.6;

writeln('a = ',a:2,'     t = ',t:6:3,'     z = ',z:6:3);

a:=a+1

end

end.