Turbo Pascal в задачах и примерах PDF
Preview Turbo Pascal в задачах и примерах
. УДК 681.3.06 Культин Н. Б. Turbo Pascal в задачах и примерах. —СПб.: БХВ-Петербург, 2012. — 256 с.: ил. ISBN 978-5-8206-0061-6 Книга представляет собой задачник по программированию на языке Turbo Pascal. Приведены как типовые задачи, т. е. ввод-вывод, использование циклов, работа с массивами, поиск и сортировка, так,и задачи, которые, как правило, остаются за рамками традиционных курсов программирования: работа со строками и файла ми, вывод на принтер, деловая графика, рекурсия. Для многих задач приведены решения — хорошо документированные тексты программ. Помимо задач и при меров книга содержит справочник по языку программирования Turbo Pascal (описание наиболее часто используемых процедур и функций) и может служить в качестве задачника для учеников 8—11 классов, изучающих программирование в школе. Для начинающих программистов УДК 681.3.06 Группа подготовки издания: Главный редактор Екатерина Кондукова Зав. редакцией Наталья Таркова Редактор Татьяна Кручинина Компьютерная верстка Ольги Сергиенко Корректор. Наталия Першакова Дизайн обложки Ангелины Лужиной Зав. производством Николай Тверских Подписано в печать 30.01.12' Формат 60х901/|6. Печать офсетная. Уел. печ. л. 16. Доп. тираж 1500 экз. Заказ Ns 45 "БХВ-Петербург”, 190005, Санкт-Петербург, Измайловский пр., 29. Первая Академическая типография «Наука» 199034, Санкт-Петербург, 9-я линия, 12/28 ISBN 978-5-8206-0061-6 О Культин Н. Б„ 2000 О Оформление, издательство "БХВ — Санкт-Петербург", 30Q| . ОДЕРЖАНИЕ (‘дисловие..............................................................................................7 работать с книгой..................................................................................8 ормление решений..................................................................................8 гть I. Задачи..........................................................................................9 •пиление переменных...............................................................................9 | фукция присваивания.........................................................................10 под.............................................................................................................13 . I...............................................................................................................15 м раммы с линейной структурой..........................................................16 ипр .............,..............................................................................................24 //........................................:.....................................................................24 | use.........................................................................................................30 I лы............................:..............................................................................31 lor............................................................................................................31 Ur peat.......................................................................................................41 While........................................................................................................43 миолы и строки......................................................................................44 < гивы..................................................................................................:....47 м к ции........................................................................................................53 пцсдуры....................................................................................................55 ||жка........................................................................................................56 .................................................................................................................64 урсия........................................................................................................69 сгь II. Решения.......................................Г........................................73 п ь III. Справочник.......................................................................209 ч ктура программы...............................................................................209 ионные типы данных.............................................................................209 11л'лые числа..........................................................................................210 . 4 Содержание Действительные числа...............................................................^.............210 Строки.........................................................................................................210 Массивы...........................................................................................................211 Записи............................................................................................................211 Выбор...............................................................................................................212 Инструкция IF..........................................................................................212 Инструкция CASE......................................................................................212 Циклы................................................................................................................213 Инструкция FOR.......................................................................................213 Инструкция REPEA Т.............................................................................214 Инструкция WFIILE..................................................................................215 Безусловный переход......................................................................................215 Инструкция GoTo.....................................................................................215 Объявление функции.....................................................................................215 Объявление процедуры...............................................................................'..216 Встроенные функции и процедуры.............................................................216 Зарезервированные слова и директивы.....................................................218 Процедуры и функции...................................................................................219 Математические функции.......................................................................219 Abs....................................................................................................219 Arctan..............................................................................................219 Cos....................................................................................................219 Exp....................................................................................................220 Ln.....................................................................................................220 Sin....................................................................................................220 Sqr...................................................................................................220 Sqrt...................................................................................................220 Random............................................................................................221 Randomize.......................................................................................221 Функции и процедуры преобразования...............................................221 In1.....................................................................................................221 Round...............................................................................................222 Str.....................................................................................................222 Trunc...............................................................................................222 Val...................................................................................................222 Функции и процедуры для работы со строками и символами.....223 Chr....................................................................................................223 Concat...............................................................................................223 Copy.................................................................................................223 Delete...............................................................................................223 Length..............................................................................................224 Pos....................................................................................................224 Процедуры и функции графического режима..................................224 Arc....................................................................................................224 Bar..................................................................................................225 . Содержание 5 Bar3D..............................................................................................225 Circle...............................................................................................225 Detect Graph....................................................................................226 Ellipse..............................................................................................226 GetX. GetY.......................................................................................226 Graph Result......................................................................................226 InitGraph.........................................................................................227 Line...................................................................................................227 LineTo.............................................................................................227 Move To............................................................................................228 MoveRel...........................................................................................228 OutText............................................................................................228 OutTextXY.......................................................................................228 PieSlice............................................................................................229 PutPixel........................,.................................................................229 Rectangle..........................................................................................229 Sector...............................................................................................230 SetColor...........................................................................................230 SetFillStyle.......................................................................................231 SetLineStyle...................................................................................232 SetTexStyle......................................................................................233 Процедуры и функции для работы с файлами.................................234 Append.............................................................................................234 Assign...............................................................................................234 Close.................................................................................................234 EOF.................................................................................................234 Erasre.............................................................................................235 IOResult...........................................................................................235 Resfit................................................................................................235 Rewrite............................................................................................236 Прочие функции.................................'.....................................................236 ClrEol.............................................................................................236 ClrScr................................................................................................236 Delay.................................................................................................236 Dispose.............................................................................................237 Eoln..................................................................................................237 GotoXY............................................................................................237 Halt...................................................................................................237 New...................................................................................................238 Param Count...................................................................................238 ParamStr.....<..................................................................................238 ReadKey...........................................................................................238 TextBackGround..............................................................................239 Text Color.........................................................................................240 . 6 Содержание WhereX............................................................................................240 WhereY............................................................................................241 Window...:........................................................................................241 Приложение.................................................................................................24.1 Вывод иллюстраций.....................................*.................................................243 Таблица кодировки символов.......................................................................247 Представление информации в компьютере.............................................24Н Десятичные, двоичные и шестнадцатеричные числа.......................24Н Память компьютера...................................................................................250 Список дополнительной литературы................................................25. Предметный указатель............................................................................25* . П р е д и с л о в и е обы научиться программировать, не достаточно прочитать ■игу, посвященную языку программирования, надо писать юграммы, решать конкретные задачи. Но где их можно найти? учебниках, как правило, приводятся типовые, стандартные лачи, в основе которых лежит расчет по формулам. Такие за- ш, несомненно, полезны, но они не всегда интересны. данной книге начинающему программисту предлагаются зада- которые, с одной стороны ему по плечу, с другой — полезны занимательны. ига состоит из трех частей и приложения. первой части собраны задачи. Они сгруппированы гго темам вносятся практически ко всем разделам программирования: объявления переменных и программ с линейной структурой работы с графикой и файлами. второй части приведены решения, представленные в виде ■ото документированных текстов программ, изучение кото- . < поможет начинающему программисту даже в том случае, и задача решена им самостоятельно. .тья часть представляет собой справочник по языку програм- ювания Tuibo Pascal, содержащий описание большинства :оцедур и функций. Если вы имеете компьютер с процессором типа Pentium (Celeron), то используйте Turbo Pascal версии 7.1. Програм мы, созданные при помощи Turbo Pascal 7.0 и использующие библиотеку ctr, на компьютерах с процессором типа Pentium (Celeron) не работают, при их запуске возникает ошибка "де ление на ноль". - раз хочется повторить, что научиться программировать <но только программируя, т. е. решая конкретные задачи. . S________________________________________Turbo Pascal в задачах и примерах Поэтому, чтобы получить максимальную пользу от книги, вы должны работать с ней активно. Решайте задачи. Изучайте при веденные решения. Вводите их в свой компьютер. Не бойтесь экспериментировать — вносите изменения в программы. Чем j большую работу вы проделаете самостоятельно, тем большему научитесь. Как работать с книгой Группы задач следуют в книге в том порядке, в котором тради ционно изучаются соответствующие разделы в курсе програм мирования. Поэтому перед тем как приступить к решению задач нужно изучить соответствующую тему — прочитать раздел учеб ника. Если сразу решить задачу не получается, то можно по- , смотреть ее решение и затем еще раз попытаться решить задачу ! самостоятельно. Писать программу лучше сначала на бумаге, а уже затем вводить программу в компьютер. Задача считается решенной, если программа работает так, как сказано в условии задачи. Оформление решений . Важно, чтобы решенная задача была правильно оформлена, что предполагает использование: • осмысленных имен переменных, констант, функций и про цедур; • отступов при записи инструкций; • комментариев. Правильно оформленную программу легче отлаживать, кроме того, она производит хорошее впечатление. Приведенные в книге примеры можно рассматривать как образ- 1 цы оформления решений задач. . Ч I. З асть адачи ш Объявление переменных 11|>иступая к решению задач этого раздела, следует помнить, что: • каждая переменная программы должна быть объявлена; • объявления переменных помещают в раздел, который начи нается словом var; • инструкция объявления переменной выглядит так: ИмяПеременной: Тип ; • 13 имени переменной можно использовать буквы латинского алфавита и цифры (первым символом должна быть буква); • основными числовыми типами языка Turbo Pascal являются: integer (целый), real (дробный); • после инструкции объявления переменной рекомендуется указывать назначение переменной. I. Объявите переменные, необходимые для вычисления значе ния функции у — X2. L Объявите переменные, необходимые для пересчета веса из фунтов в килограммы. Д. Объявите переменные, необходимые для вычисления объема параллелепипеда. 4. Объявите переменные, необходимые для вычисления площади круга. 5. Объявите переменные, необходимые для вычисления площади кольца. . 10 Turbo Pascal в задачах и примерах 6. Объявите переменные, необходимые для вычисления объема и площади поверхности цилиндра. 7. Объявите переменные, необходимые для вычисления стои мости покупки, состоящей из нескольких тетрадей, карандашей, и линейки. 8. Объявите переменные, необходимые для вычисления стоимо- , сти покупки, состоящей из нескольких тетрадей и такого же ко личества обложек. Инструкция присваивания Приступая к решению задач этого раздела, с'ледует вспомнить, > что: * инструкция присваивания используется для изменения зна- • чений переменных, в том числе и для вычислений по формулам; • тип выражения, находящегося в правой части. инструкции присваивания, должен соответствовать типу переменной, имя которой стоит слева от символа инструкции присваивания ; (при нарушении соответствия типа переменной и выражения компилятор выводит сообщение об ошибке Type miss match — несоответствие типов). 9. Запишите инструкцию, которая присваивает переменной х значение —1,5. 10. Запишите инструкцию, которая присваивает переменной summa ; нулевое значение. 11. Запишите инструкцию, которая увеличивает на единицу зна чение переменной п. 12.. Запишите инструкцию, которая уменьшает на два значение переменной counter. 13. Запишите инструкцию вычисления среднего арифметиче ского переменных xi и х2. 14. Запишите в виде инструкции присваивания формулу вычис ления значения функции у = -2,7х3 + 0,23х2 - 1,4. .
The list of books you might like
