#pas
...
int1 := 5 + 2;
procedure MyProc(Arg:integer);
begin
//мой код
end;
MyProc(2);
...
Внутри кода функции нельзя объявлять переменные, типы, функции, процедуры... в общем, вообще ничего нельзя объявлять, можно только использовать уже объявленное до begin функции