Здравствуйте! Помогите пожалуйста с отчетом:

Отчет должен содержать условия задачи, блок-схему алгоритма, (текст программы, исходные данные и результаты - это я сделал)

Для заданной функции f=tg(k^3)+sin(k-2,4) вывести на экран отрицательные значения функции и соответствующие им значения аргумента на отрезке k[$8712$][a,4] с шагом h=0,2.

А вот и сама программка:

program qq;
const b=4; h=0.2;
var f,k,a:real;
begin
readln(a);
K:=a;
while k<=b do begin
f:=((sin(power(k,3)))/(cos(power(k,3))))+sin(k-2.4);
if f<0 then
writeln('F=',f,' k=',k);
k:=k+h;
end;
end.