типизир и текст фаилы, целая курсовая вам на растерзание Опции

[Vd0]

1 Таблица: (типизированный фаил)
- ФИО;
- дата рождения;
- пол;
- дата вступления в клуб;
- вид услуги (несколько, но не более 3);
- вид скидки;
- наличие дисконтной карты (при наличии карты дополнительная скидка 5% на все услуги).

2 Таблица: (типизированный фаил)
- вид услуги;
- цена.

3 Таблица: (текстовый фаил)
- вид скидки;
- процент скидки.

Определить стоимость услуг для каждого клиента, общую стоимость услуг, оказанных фирмой по месяцам.


Дополнительные вопросы:
1. Какая самая популярная услуга у владельцев дисконтных карт?
2. Сделайте дополнительную скидку в 3% на все услуги женщинам перед 8 марта и мужчинам перед 23 февраля (за 10 дней).

Для каждого файла должна быть предусмотрена возможность
- загрузки файла (просмотр)
- добавление новой информации в файл
- удаление информации
- корректировка
- сохранение после изменений



буду рад помощи как сделать это всё. а в частности как сделать 3-й фаил текстовый и записывать в формате "
вид скидки1 процент скидки1
вид скидки2 процент скидки2
вид скидки3 процент скидки3
...
"

[APAL]

Предистория откуда взялся топик:

14.10.2004 18:44:56, JACKQUE V00DOO
привет. можно 1 вопрос по делфи паскалю?
14.10.2004 18:45:03, APAL
Давай.
14.10.2004 18:45:53, JACKQUE V00DOO
вид скидки| процент скидки
string[15]  real
как это записать в текстовый файл и как считать?
14.10.2004 18:46:31, JACKQUE V00DOO
если делаю вручную фаил то считывается, а программно не получается. он считывает целую строку.
14.10.2004 18:48:12, APAL
Type
  Rec = record
    skidka : String[15];
    procent : Real;
End;
Var
  f : File of Rec;
  d : Rec;
Begin
  ...
Write(f,d);
  ...
Read(f,d);
...
End.
14.10.2004 18:48:47, JACKQUE V00DOO
это с использованием record! а другой спобос есть?
14.10.2004 18:49:46, APAL
Можно и другим способом. Использую нетипизированные файлы, но тогда надо самому следить за форматом запросов.
14.10.2004 18:49:56, APAL
Аааа. Понял
14.10.2004 18:50:02, APAL
Можно и в текстовом.
14.10.2004 18:50:08, APAL
Только муторно это
14.10.2004 18:50:10, JACKQUE V00DOO
даже нужно )))
14.10.2004 18:50:26, JACKQUE V00DOO
нужно считывать целиком строку и обрезать её?
14.10.2004 18:50:30, APAL
Лучше делать в типизированном, а результат можно выводить в текстовый
14.10.2004 18:51:09, JACKQUE V00DOO
я понимаю, но задание курсовика так гласит (( текстовый файл.
14.10.2004 18:51:53, APAL
Так имеется в виду что? Хранить данный в текстовом или выводить информацию в текстовый файл (т.е. результат работы)?
14.10.2004 18:52:15, JACKQUE V00DOO
хранить!
14.10.2004 18:52:36, APAL
мда... и это курсовик... я в печали.
14.10.2004 18:52:46, APAL
можно конечно работать и с текстовым
14.10.2004 18:52:53, APAL
но как я уже говорил - гемморой
14.10.2004 18:53:00, APAL
но МОЖНО
14.10.2004 18:53:01, JACKQUE V00DOO
ну там на самом деле ещё 2 фаила типизированного
14.10.2004 18:53:12, JACKQUE V00DOO
а как? принцип какой?
14.10.2004 18:53:51, APAL
А. Так значит с данными мы работаем в типизированных файлах, а втекстовый выводим результат. Тогда тут и проблемы не должно быть.
14.10.2004 18:54:03, JACKQUE V00DOO
нет!
14.10.2004 18:54:17, JACKQUE V00DOO
щас всё задание дам чтобы понятно было всё сразу
14.10.2004 18:54:22, APAL
Погодь.
14.10.2004 18:54:28, APAL
Через асю неудобно
14.10.2004 18:54:36, APAL
Давай выкладывай сразу на форум.
14.10.2004 18:54:49, JACKQUE V00DOO
куда именно*
14.10.2004 18:55:07, APAL
В раздел соответствующий вопросу.
14.10.2004 18:55:14, APAL
Думаю - в задачи
14.10.2004 18:55:26, APAL
Хотя можно и в теор. вопросы...
14.10.2004 18:55:33, APAL
есть над чем подумать
14.10.2004 18:55:42, JACKQUE V00DOO
в задачи полез уже
14.10.2004 18:55:50, APAL
И?
14.10.2004 18:56:04, JACKQUE V00DOO
щас запощу