На отрезке (-3,14;3,14) с шагом 0,2 протабулировать функцию sin^2(x)+cos^2(x) Помогите решить и обьясните все подробно!!

переделай под свою
program yabulaciya; // f:=sin(k*k*k)/cos(k*k*k) + sin(k - 2.4);
uses crt; //xvar a:integer;
f,k:real;
BEGIN
clrscr;
writeln(vichislenie funkcii);
writeln(---------------------);
writeln;
write(vvesti levuy granicu promegutka A (celoe!)-->);
readln(a);
writeln;
writeln( x f);
writeln(----------------);
k:=a;
repeat
f:=sin(k*k*k)/cos(k*k*k) + sin(k - 2.4);
writeln(k:6:2,f:7:2);
k:=k+0.2;
until k >4;
writeln(----------------);
writeln;
writeln(konec zadachi);
readkey;
END.