|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
22.08.2015, 18:53 | #1 |
Пользователь
Регистрация: 18.08.2015
Сообщений: 20
|
Подмогните с лабой) компонент TstringList нельзя брать((((
Анкета для опроса населения содержит две группы вопросов. Первая группа содержит сведения о респонденте:
- возраст; - пол; - образование (начальное, среднее, высшее). Вторая группа содержит собственно вопрос анкеты, ответ на который либо ДА, либо НЕТ. Составить программу, которая: - обеспечивает начальный ввод анкет и формирует из них линейный список; - на основе анализа анкет выдает ответы на следующие вопросы: - сколько мужчин старше 40 лет, имеющих высшее образование, ответили ДА на вопрос анкеты; - сколько женщин моложе 30 лет, имеющих среднее образование, ответили НЕТ на вопрос анкеты; сколько мужчин моложе 25 лет, имеющих начальное образование, ответили ДА на вопрос анкеты - производит вывод всех анкет и ответов на вопросы. Программа должна обеспечивать диалог с помощью меню и контроль ошибок при вводе. |
22.08.2015, 19:01 | #2 |
мальчик-помогай =)
Форумчанин
Регистрация: 16.09.2010
Сообщений: 522
|
Собственно говоря, а где вообще тут TStringList? тут для ввода проще всего создать отдельную форму, а вывод результатов анализа - куда-угодно
Последний раз редактировалось GreenWizard; 22.08.2015 в 19:05. |
22.08.2015, 19:07 | #3 | ||
Пользователь
Регистрация: 18.08.2015
Сообщений: 20
|
Цитата:
type pnode=^node; node=record d:word; s:string; pnode; Цитата:
на кибер форуме хрень все пишут, может тут чего ясного подскажут Вот примерный скрин внешнего вида. Последний раз редактировалось Stilet; 22.08.2015 в 19:47. |
||
22.08.2015, 19:28 | #4 | |
мальчик-помогай =)
Форумчанин
Регистрация: 16.09.2010
Сообщений: 522
|
Цитата:
Код:
|
|
22.08.2015, 19:34 | #5 |
Пользователь
Регистрация: 18.08.2015
Сообщений: 20
|
|
22.08.2015, 19:43 | #6 | |
мальчик-помогай =)
Форумчанин
Регистрация: 16.09.2010
Сообщений: 522
|
Например, это:
Цитата:
Код:
|
|
22.08.2015, 19:47 | #7 | |
Пользователь
Регистрация: 18.08.2015
Сообщений: 20
|
Цитата:
|
|
22.08.2015, 20:02 | #8 | |
мальчик-помогай =)
Форумчанин
Регистрация: 16.09.2010
Сообщений: 522
|
Цитата:
2) общая схема: создали узел с инфой -> если список пуст (head = nil), то заменяем новым узлом head, иначе мы идём по списку и ищем первый попавшийся (он единственный) элемент с Next = nil и заменяем nil на новый узел наш т. к. добавляем всё в конец Есть вариант с добавлением в начало, он проще, но его редко используют и препод может забраковать его |
|
23.08.2015, 18:01 | #9 | |
Пользователь
Регистрация: 18.08.2015
Сообщений: 20
|
Цитата:
Код:
Последний раз редактировалось Stilet; 23.08.2015 в 18:11. |
|
23.08.2015, 18:12 | #10 | |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
Цитата:
I'm learning to live...
|
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Помогите с лабой | Rainb0wDash | Помощь студентам | 9 | 17.10.2013 15:57 |
Компонент StringBox: двойной TStringList | apromix | Компоненты Delphi | 0 | 25.06.2010 23:00 |