Функция в функции Опции

[Negor]

Возможно ли передать одной функции другую функцию как параметр?Если да то как?

[APAL]

Уточните вопрос...

А вообще-то:
Можно передать одной функции результат работы другой функции как параметр.

[volvo]

FAQ: Процедурные типы

[Lapp]

Вот примерчик..

type
  tF=function(x:integer):integer;

function F1(x:integer):integer; far; { <-- Исправлено }
begin
  F1:=x+100;
end;

function F2(x:integer;g:tF):integer;
begin
  F2:=g(x)+1000;
end;

begin
  WriteLn(F2(2,F1));
  ReadLn
end.

Сообщение отредактировано: volvo - 3.11.2006 22:12

[volvo]

lapp, тебя опять подводит FPC

Ты забыл Far, без этого в Турбо Паскале программа не скомпилируется

[Lapp]

lapp, тебя опять подводит FPC

sorry..
[слышится скрип мозгов]
volvo, исправь, я уже клюю носом..

[Гость]

Уточнить не могу,как в задании написанно так и написал.В принципе ответ lappa меня вполне устраивает(чтото такое мне когдато помогло с массивами), поэтому если он работает, то тему можно закрыть. Мне ещё советовали с помощью указателей, но в C++. А в паскале не знаю таких методов. Мож кто знает

[volvo]

Гость, по приведенной ссылке, значит, тебе сходить лень... Ну, правильно. Чего себя утруждать. Там же читать надо, а тут глядишь и выложат все на блюдечке, чтобы ты сразу к трапезе приступил. Только смотри, чтобы ЗА ТЕБЯ и не съели...