Помогите пожалуйста ( 9 класс ) program Очень надобно пожалуйста

Используя достаточно скудные сведения о том, что нужно сделать я подготовил программу для вывода всех a при b[-13;10] с шагом 1.

Program n_1;

var a:double; b:integer;

begin

   for b:=-13 to 10 do begin

       a:=3*b*b*b+4/7;

       writeln('При b=', b, ' a=', a:0:5);

   end;

end.