|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
02.01.2018, 17:11 | #1 |
Регистрация: 02.01.2018
Сообщений: 5
|
Помогите пожалуйста с программой в Паскаль. Файловый тип данных
Запросить у пользователя улицу (табл.№21) и цифру из набора [2,3,5,6]. Вывести на экран записи абонентов, живущих на указанной улице и имеющих нечетный номер дома. Вывести записи абонентов, у которых телефон начинается на цифру, указанную пользователем, и указать их количество. Вычислить, у кого из этих абонентов номер телефона – наибольший, рассматривая его как число, у какого - наименьший.
№21. Телефонный справочник Фамилию абонента Улица Номер дома Номер кварт. Номер телефона Иванов Агеева 11 3 244556 Петров Пушкина 17 37 277777 Сидоров Ленина 44 78 399695 Мишин Пушкина 19 6 244555 Васин Ушакова 28 88 651313 Андреев Ушакова 20 12 399111 Захаров Ленина 33 45 256782 Тарасов Ленина 37 15 324453 Дмитриев Агеева 13 23 588912 Никитин Францева 45 67 245698 Петин Францева 44 22 511695 Ромин Агеева 56 44 567123 Борисов Ленина 55 19 244333 Часть программы сделана, затруднение вызывают номера телефонов. Не получается выделить первую цифру номера и сравнить с вводимым числом. Помогите пожалуйста. |
02.01.2018, 19:03 | #2 |
Старожил
Регистрация: 12.11.2010
Сообщений: 8,568
|
Покажите, что у вас сделано. Участникам форума будет вам легче помогать.
Не забывайте правильно оформлять исходный код http://www.programmersforum.ru/showp...23&postcount=3 |
06.01.2018, 03:42 | #3 | |
Регистрация: 02.01.2018
Сообщений: 5
|
Цитата:
Код:
Последний раз редактировалось Vera_A; 06.01.2018 в 04:55. |
|
06.01.2018, 10:48 | #4 | |
Старожил
Регистрация: 20.04.2008
Сообщений: 5,526
|
Цитата:
помните вы же написали выше (до начала цикла) Код:
Код:
Код:
программа — запись алгоритма на языке понятном транслятору
|
|
06.01.2018, 10:55 | #5 | ||
Старожил
Регистрация: 20.04.2008
Сообщений: 5,526
|
P.S.
Цитата:
Цитата:
программа — запись алгоритма на языке понятном транслятору
|
||
07.01.2018, 07:44 | #6 | |
Регистрация: 02.01.2018
Сообщений: 5
|
Цитата:
max программа посчитала правильно, а min выводит последний номер из найденных Последний раз редактировалось Vera_A; 07.01.2018 в 10:00. |
|
07.01.2018, 07:46 | #7 |
Регистрация: 02.01.2018
Сообщений: 5
|
|
07.01.2018, 11:44 | #8 | |
Старожил
Регистрация: 04.02.2011
Сообщений: 4,550
|
При чем тут
Цитата:
"Оформлять" надо так, как организовано хранение информации в файле, а разделять инфу одного и того же телефонного справочника в разных файлах - идиотизм, при любой коррекции можно случайно убить весь справочник. Начальное значение min= должно быть не 0, а максимально возможное, иначе сравнение с min не сработает никогда. Последний раз редактировалось digitalis; 07.01.2018 в 20:34. |
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
файловый тип данных | ksenija15reg | Паскаль, Turbo Pascal, PascalABC.NET | 5 | 03.11.2014 17:13 |
Файловый тип данных (Pascal) | ksenija15reg | Помощь студентам | 3 | 07.12.2013 11:14 |
файловый тип данных | zxzxz | Помощь студентам | 5 | 07.05.2013 19:34 |
файловый тип данных и тд. | deni007-92 | Фриланс | 2 | 03.06.2010 15:09 |
Файловый тип данных Delphi | LastBreath | Помощь студентам | 2 | 26.05.2010 14:05 |