Ошибка BEGIN

[nemq]

Recompiling because of C:\fpc\2.2.4\bin\i386-win32\pascal work\test.pas
test.pas(46) Fatal: Syntax error, "BEGIN" expected but "end of file" found
test.pas(0) Fatal: Compilation aborted

[vasek123]

А ты End ставил? Одно из сообщений следующее:
Fatal: Синтаксическая ошибка "BEGIN" ожидаемым, но "конец файла" найден

[nemq]

program parfum;
uses crt;
  type
  integ=^int;
  int=record
      nomer:integer;
      next:integ; 
    end;
 
var Nach:integ;
    tek:integ;
    d:integ;
    i:integer;
    ch:char;
    Rozd:string;
    nabor:integer;
    men:array[1..16] of integer;
    strok, stolb:integer;
    lom:integer;
    vof:boolean;
    Razdel:integer;
    PodRazd:integer;
    MRazdel:integer;
    stek:text;
 
    ScetRP:integer;
    hod:integer;
    kolvo:integer;
    Text1,Text2,Text3,Text4:string[19];
    f:text;
    f1,f2,f3,f4,f8,pd,pu,f10:integer;
    Prin:boolean;
 
 
 Baza:record
       Fsim:string;
       FKod:integer;
       FRazdel:integer;
       FPodRazdel:integer;
       FName:String;
       FSeria:string;
       FProizvod:string;
       FOpisan:string;
       FMany:string;
 end;

[vasek123]

У тебя нет ключевого begin, компилятор, просто, не видит где переменные а где само тело программы...

[russian-stalker]

добавьте в конце:

begin
end.

[Ky3Heu,]

У тебя отсутствует BEGIN, но есть END. Структура составного оператора:

Begin
operator1;
operator2;
end;

[nemq]

Теперь понятно, спасибо