Записи Опции

[T__k]

Помогите пожалуйста с написанием контрольной!!!!
вот такое вот задание: Реализовать алгоритм обработки данных сложной структуры типа запись.
Информация службы занятости о вакансиях содержит следующие данные: должность, заработок, необходимые образование и стаж работы, количество вакантных мест.
Написать программу, в которой:
обеспечить ввод данных с клавиатуры и сохранение их в типизированном файле;
организовать выборку из типизированного файла информации о вакансии при заданном образовании с минимальным необходимым стажем, вывод данных о них на экран и сохранение в текстовом файле.

кое-что я сделала, но на большее мозгов не хватает!!!

Program Z5;
Type
cz= record        
    D,O: string;
    Z,VM,SR: real;       
 end;
var
  m: cz;         
  f: file of cz; 
  ft: text;          
  ans: char;             
  begin
  assign( f, 'cz');
  rewrite( f);
  repeat
  with m do
    begin
      write('Должность?');    readln(D);
      write('Заработная плата?');   readln(Z);
      write('Образование?');   readln(O);
      write('Стаж работы? ');   readln(SR);
      write('Наличие вакантных мест? '); readln(VM);
     end;
    write( f, m);
    write('Ввод закончен? ');
    readln(ans);
  until (ans='Y') or (ans='y');
  close( f);

Добавил теги подсветки. Так программа лучше читается, правда?

Сообщение отредактировано: volvo - 7.01.2011 22:42