![]() |
1. Заголовок или название темы должно быть информативным !
2. Все тексты фрагментов программ должны помещаться в теги [code] ... [/code] или [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ" и используйте ПОИСК !
4. НЕ используйте форум для личного общения!
5. Самое главное - это раздел теоретический, т.е. никаких задач и программ (за исключением небольших фрагментов) - для этого есть отдельный раздел!
![]() |
Romario |
![]()
Сообщение
#1
|
![]() Пионер ![]() ![]() Группа: Пользователи Сообщений: 89 Пол: Мужской Репутация: ![]() ![]() ![]() |
Начинаю серьёзно учить Паскаль и вот решил создать и пихать сюда все неясности, если вы конечно не против
Первые вопросы:
|
![]() ![]() |
Romario |
![]()
Сообщение
#2
|
![]() Пионер ![]() ![]() Группа: Пользователи Сообщений: 89 Пол: Мужской Репутация: ![]() ![]() ![]() |
...
продолжение: 11. Сформировать файл, имеющий следующую структуру type игрушка=record название:string; цена:integer; возраст1:1..16; возраст2:1..16; end; и определить: o название самой дорогой игрушки; o список игрушек, которые подходят детям данного возраста; o подобрать игрушки на данную сумму денег (все варианты). 12. Сформировать файл, имеющий следующую структуру type игрушка=record название:string; цена:integer; цвет:string; возраст1:1..16; возраст2:1..16; end; и определить: o название игрушек, цена которых не превышает данную и которые подходят детям данного возраста; o найти самую дешевую игрушку данного названия; o найти самый распространенный цвет игрушек. 13. Сформировать файл, имеющий следующую структуру type пассажир=record фамилия:string; имя:string; номер рейса:string; количество вещей:integer; общий вес:integer; end; и определить: o число пассажиров, количество вещей которых превосходит среднее число вещей; o пассажира с данным количеством вещей и не более данного веса; o вывести информацию о количестве вещей и общем весе каждого рейса. 14. Сформировать файл, имеющий следующую структуру type спортсмен=record фамилия:string; страна:string; рост:150..220; вес:30..100; год рождения:ineger; результат:integer; end; и определить: o средний рост и вес спортсменов данной страны; o найти лучшего спортсмена данной страны; o список спортсменов данного возраста с результатом, не хуже данного. 15. Сформировать файл, имеющий следующую структуру type спортсмен=record фамилия:string; страна:string; тренер:string; год рождения:ineger; результат:integer; end; и определить: o найти самого молодого спортсмена, занимающегося у данного тренера; o найти лучшего тренера данной страны; o список тренеров с указанием страны. 16. Сформировать файл, имеющий следующую структуру type предмет=record название:string; количество часов:integer; преподаватель:string; кафедра:string; форма отчетности:(зачет,экзамен); end; и определить: o преподавателя, у которого самое большое количество часов; o список предметов, по которым сдают экзамен; o кафедру и преподавателя, который ведет данный предмет. 17. Сформировать файл, имеющий следующую структуру type предмет=record название:string; 0количество часов:integer; преподаватель:string; кафедра:string; форма отчетности:(зачет,экзамен); end; и определить: o преподавателя, который принимает больше всего экзаменов; o кафедру, на которой читается больше всего предметов; o список преподавателей данной кафедры. 18. Сформировать файл, имеющий следующую структуру type предмет=record название:string; количество часов:integer; преподаватель:string; кафедра:string; форма отчетности:(зачет,экзамен); end; и определить: o найти среднюю нагрузку по данной кафедре; o найти количество зачетов и экзаменов у данного преподавателя; o список предметов, читаемых данной кафедрой. 19. Сформировать файл, имеющий следующую структуру type преподаватель=record фамилия:string; предмет:string; факультет:string; курс:1..5; количество часов:integer; end; и определить: o преподавателя имеющего самую большую нагрузку; o список предметов, которые читает данный преподаватель; o объем часов на данном факультете и данном курсе. 20. Сформировать файл, имеющий следующую структуру type игрушка=record название:string; цена:integer; возраст1:1..16; возраст2:1..16; end; и определить: o название самой дорогой игрушки; o список игрушек, которые подходят детям данного возраста; o подобрать игрушки на данную сумму денег (все варианты). 21. Сформировать файл, имеющий следующую структуру type книга=record автор:string; название:string; год издание:integer; издательство:string; количество страниц:integer; end; и определить: o есть ли в библиотеке книги данного автора; o найти книгу с наибольшим количеством страниц; o найти названия книг данного автора, изданных с указанного года, в данном издательстве. 22. Сформировать файл, имеющий следующую структуру type знакомый=record фамилия:string; номертел:10000..99999; адрес:string; end; и определить: o есть ли в книжке телефон данного человека; o кому принадлежит данный телефон; o список людей, живущих на данной улице ... |
![]() ![]() |
![]() |
Текстовая версия | 22.06.2025 5:47 |