Почему то выбивает ошибку что не объявлен идентефикатор add Код: Сама форма: PHP: uses matem; ... procedure TForm1.Button1Click(Sender: TObject); var a,b:integer; begin a:=strtoint(edit1.text); b:=strtoint(edit2.text); label1.caption:=inttostr(add(a,b)); <---тут ошибку выдает end; end. Код модуля PHP: unit matem; interface implementation umn(a:integer):integer; begin result:=((a+1)*4)-3; end; del(b:integer):integer; begin result:=((b-4)*6)-4; end; function add(a,b:integer):integer; var c:integer; begin c:=((a+b)*umn(a))/(del(b)); result:=c; end; end. Подскажите в чем дело. Зарание спасибо
функцию необходимо описать - после ключевого слова interface: Code: unit matem; interface function add(a,b:integer):integer; implementation ...............