паскаль. сформировать файл

[vykker]

помогите пожалуйста
Сформировать файл, содержащий сведения об n работниках предприятия. Должны учитываться следующие сведения: ФИО, стаж работы, профессия. Вывести фамилии людей определенной профессии с опытом работы не менее Х лет (профессия и минимальный стаж вводятся с клавиатуры).

то что нашел:

Program sotr;

uses crt;

var
name:array [0..50] of string;
work:array [0..50] of string;
pay:array [0..50] of string;
f:text;
i,j:integer;
payall,_pay:real;
varcode:integer;

Begin
assign(f,'C:\1\sotr.txt');
reset(f);
i:=0;
payall:=0;

[Grag]

Тебе нужна совершенно другая структура данных, например

Type
   Person:record
               Fam, Name, Otch:string;
               Staj:byte; {количество лет стажа работы}
               Proff:string {наименование профессии}
             end;
Var
  Persons:array[0..49] of Person; {массив сотрудников}
  f: file of Person;

Ну а дальше по потребностям и возможностям....

[vykker]

причем первое превосходит второе во много раз

[vykker]

допустим, а как дальше?

[vykker]

help me! help!