fkniga

Ответ от Gennady[гуру]
> подскажите где ошибка?! ! А что по этому поводу говорит компилятор? procedure pr_sozid(ff:fkniga); У вас же fkniga является записью (type fkniga=record), а в процедуре вы пытаетесь работать с этим параметром как с файловой переменной (rewrite(ff);). Это раз, а во-вторых, не факт, что тип переменной ff, описанной в секции var совпадет с типом локального параметра ff процедуры procedure pr_poisk(ff:file of fkniga); Чтобы типы сопали, объявите в секции type тип, например, DataFile = file of fkniga; и уже его используйте в качестве типа переменной и локальных параметров. В-третьих, оператор множественного выбора case должен завершаться служебным словом end; И если не изменяте память, файлы должны передаваться по ссылке, т. е. имя параметра должно предваряться словом var.