無効なプロシージャまたは関数の参照 - 私のコードがスローなぜパスカル

Question

誰かが私に言うことができる：

Error: Invalid procedure or function reference - Pascal

PROGRAM ITVS_19_1; 
TYPE FUNC = FUNCTION(x:REAL):REAL; 
VAR a, b, k1, k2:REAL; 

FUNCTION f(x:REAL):REAL; 
BEGIN 
    f:=SQR(COS(x))-2/35*COS(x)-1/35; 
END; 

FUNCTION g(x:REAL):REAL; 
BEGIN 
    g:=SQR(COS(x))-2/5*COS(x)-1/25; 
END; 

FUNCTION PYB(f:FUNC; a, b, C:REAL):REAL; 
BEGIN 
    WHILE ABS(F(a) - F(b)) > 0.00001 DO 
    BEGIN 
    c:=(a+b)/2; 
    IF (f(a)*f(c)) < 0 THEN 
     b:=c 
    ELSE 
     a:=c; 
    END; 
    PYB:=(a+b)/2; 
END; 
  
BEGIN 
    READ(a, b); 
    k1:=PYB(f, a, b); 
    k2:=PYB(f, a, b); 
    WRITELN('f-funksiya', k1); 
    WRITELN('g-funksiya', k2); 
END. 

Answer 1

機能PYBが宣言されています

FUNCTION PYB(f:FUNC; a, b, C:REAL):REAL; 

このプロシージャの呼び出しは、3 REALが必要ですパラメータは2つしか渡しません：

k1:=PYB(f, a, b);