Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 10.03.2009, 15:56   #1
08ekhiv1
Пользователь
 
Регистрация: 28.02.2009
Сообщений: 27
Вопрос Типизированые файлы DELPHI

Хех есть вот такой пример задачки:
Сформировать базу данных: "Перепись населения" с элементами:
- Ф.И.О.
- Год рождения.
- Пол.
- Национальность.
Требуется вывод следующих данных: национальный состав населения: т.е. процент людей определенной национальности к общей численности. Рассартировать в порядке убывания по колличеству процентов.

Задача на мой взгляд не трудная. Но вот у меня есть пара вопросов.
1) Что значит "Сформировать базу данных". Просто ввести с клавиатуры в консоли и в конце получить ответ, или допустим дан некоторый файл ... ммм например perepis.dat и из его провести чтение. А вот тут возникает вопрос как присвоить строку в этом файлу к определенному типу?. Или же тут что-то по-сложнее будет?
2) И если это и есть тот случай "по-сложнее" то как его реализовать...
08ekhiv1 вне форума Ответить с цитированием
Старый 10.03.2009, 16:03   #2
alex_fcsm
Участник клуба
 
Аватар для alex_fcsm
 
Регистрация: 10.11.2008
Сообщений: 1,502
По умолчанию

Например,Данные записывать в файл
f:file of SItizen[SITIZEN=record с ФИО,год рождения....]
Нормальное состояние техники - нерабочее, все остальное частный случай.
alex_fcsm вне форума Ответить с цитированием
Старый 10.03.2009, 16:04   #3
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Цитата:
Просто ввести с клавиатуры в консоли и в конце получить ответ
А почему нет? И записать введенное в файл.
после чего будет:
Цитата:
дан некоторый файл ... ммм например perepis.dat и из его провести чтение
Цитата:
как присвоить строку в этом файлу к определенному типу?
А вот это вообще непонятный вопрос.
Цитата:
И если это и есть тот случай "по-сложнее" то как его реализовать...
Базами данных.
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 10.03.2009, 16:08   #4
alex_fcsm
Участник клуба
 
Аватар для alex_fcsm
 
Регистрация: 10.11.2008
Сообщений: 1,502
По умолчанию

Цитата:
Сообщение от 08ekhiv1 Посмотреть сообщение
А вот тут возникает вопрос как присвоить строку в этом файлу к определенному типу?.
Я так понимаю Вы не поняли как читать из типизированного файла? Если я угадал,то: Ваш файл будет представлять собой набор записей. И
в
Код:
while not (eof(F)) do
 begin
  read(f,[variable:SITIZEN]);
/// действия с переменной
 end;
Нормальное состояние техники - нерабочее, все остальное частный случай.
alex_fcsm вне форума Ответить с цитированием
Старый 10.03.2009, 16:12   #5
08ekhiv1
Пользователь
 
Регистрация: 28.02.2009
Сообщений: 27
По умолчанию

Цитата:
Сообщение от Stilet Посмотреть сообщение
А почему нет?
А использование процедуры Reset(textfile) многократно, будет добавлять данные в эту базу или заменять её?
08ekhiv1 вне форума Ответить с цитированием
Старый 10.03.2009, 16:15   #6
alex_fcsm
Участник клуба
 
Аватар для alex_fcsm
 
Регистрация: 10.11.2008
Сообщений: 1,502
По умолчанию

Reset - открывает файл на чтение. А вообще Вам сюда. Хотя и хелп в Паскале вполне информативен
Нормальное состояние техники - нерабочее, все остальное частный случай.
alex_fcsm вне форума Ответить с цитированием
Старый 10.03.2009, 16:15   #7
08ekhiv1
Пользователь
 
Регистрация: 28.02.2009
Сообщений: 27
По умолчанию

Xмм alex_fcsm подскажи а что означает в строке read(f,[variable:SITIZEN]) variable???
08ekhiv1 вне форума Ответить с цитированием
Старый 10.03.2009, 16:18   #8
alex_fcsm
Участник клуба
 
Аватар для alex_fcsm
 
Регистрация: 10.11.2008
Сообщений: 1,502
По умолчанию

Цитата:
Сообщение от 08ekhiv1 Посмотреть сообщение
Xмм alex_fcsm подскажи а что означает в строке read(f,[variable:SITIZEN]) variable???
Я имел в виду

Код:
var x:SITIZEN;

begin

.....
read(f,x);
.....

end.
Нормальное состояние техники - нерабочее, все остальное частный случай.
alex_fcsm вне форума Ответить с цитированием
Старый 10.03.2009, 16:38   #9
08ekhiv1
Пользователь
 
Регистрация: 28.02.2009
Сообщений: 27
По умолчанию

аа все спс понял...
08ekhiv1 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Файлы в Delphi Levhik Общие вопросы Delphi 5 07.02.2009 13:46
файлы Delphi tatb9na Общие вопросы Delphi 1 15.12.2008 03:23
Записи/типизированые файлы innaa639 Паскаль, Turbo Pascal, PascalABC.NET 3 08.12.2008 09:08
2 вопроса по делфи на тему типизированые файлы. ЭД4-0014 Помощь студентам 5 06.06.2008 12:48