Консольное приложение: файлы и записи (Delphi)

[Vol4ok]

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

[Rififi]

И че дальше?

думаешь, щас толпень прогеров, которым больше нечем заняться, ломанется делать твою лабу?

[Vol4ok]

Сообщение от Rififi

И че дальше?

думаешь, щас толпень прогеров, которым больше нечем заняться, ломанется делать твою лабу?

Итак, во первых: Если тебе захотелось потролить, то ты выбрал не ту тему
Во вторых, почти всегда найдётся тот, кому не влом помочь, для программистов это даже не задача
В третьих: Я помогал другим уже тогда, когда ты ещё не умел тролить.
Этого достаточно?

ПС. Просто я болел и не успеваю всё делать

[eoln]

Мне не влом, но я болею и не успеваю всем помогать. Могу предложить бартер - решение задачи за 178 пачек ацетилсалициловой кислоты. Отправка с курьером (почтой России не высылать - не доживу я) или денежным эквивалентом через webmoney (около 500р) //eoln[собака]mail.ru

[Vol4ok]

Сообщение от eoln

Мне не влом, но я болею и не успеваю всем помогать. Могу предложить бартер - решение задачи за 178 пачек ацетилсалициловой кислоты. Отправка с курьером (почтой России не высылать - не доживу я) или денежным эквивалентом через webmoney (около 500р) //eoln[собака]mail.ru

Шутка зачтена.. А бартер не является таковым, стоимость этой задачи явно не превышает цены шоколадки.

[Vol4ok]

Сообщение от eoln

Мне не влом, но я болею и не успеваю всем помогать. Могу предложить бартер - решение задачи за 178 пачек ацетилсалициловой кислоты. Отправка с курьером (почтой России не высылать - не доживу я) или денежным эквивалентом через webmoney (около 500р) //eoln[собака]mail.ru

Поправляйся, сочувствую, я когда болел вообще ничего не мог делать, даже в инете сидеть..

[Человек_Борща]

Шутка зачтена.. А бартер не является таковым, стоимость этой задачи явно не превышает цены шоколадки.

Ну так купи себе шоколадку и делай лабу У меня на шоколадки аллергия.
Цена задачке адеватная.

Объвляешь тип:

 type 
    per = record
     FIO:string;
     street:string;
     hause:Integer;
     flat:Integer;
   end;

Потом файл:

var f: file of per;

потом AssignFile, Read, write, EOF, CloseFile

все. Вот там вверху ссылочка "Основы Delphi" там с лихвой можно найти всю нужную иноформацию по функциям. И уж темболее есть пример чтения, записи record'ов.

[northener]

Сообщение от Человек_Борща

Ну так купи себе шоколадку и делай лабу У меня на шоколадки аллергия.
Цена задачке адеватная.

Объвляешь тип:

 type 
    per = record
     FIO:string;
     street:string;
     hause:Integer;
     flat:Integer;
   end;

Потом файл:

var f: file of per;

потом AssignFile, Read, write, EOF, CloseFile

А потом кто будет отвечать на вопросы, почему программа работает только до своего закрытия?