Процедуры и функции в качестве параметров

[Magic]

Возможно ли в Vip-е передавать процедуры и функции в качестве параметров?

Пример такой функции на паскале:

Задача. Составить процедуру выдачи таблицы произвольной вещественной функции. Процедура должна иметь следующие формальные параметры: вещественную функцию, нижнюю границу документа, шаг по аргументу.

Код: Выделить всё

procedure tab(function f: real; low, up, step: real);
var 
  x: real;
  j: integer;
begin
  x := low;
  for j := 0 to trunc((up – low) / step) do 
  begin
    writeln(x:10, f(x):10);
    x := x + step;
  end;
end;

Если к функции tab обратиться оператором

Код: Выделить всё

tab(sin, 0.0, 6.4, 0.33);

то будет напечатана таблица функции sin x для x от 0 до 6.4 с шагом 0.33.

[cruger]

с помощью объектов можно решить задачу