Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:

методическое руководство по PASCAL новое

.pdf
Скачиваний:
14
Добавлен:
15.05.2015
Размер:
622.05 Кб
Скачать

 

Вариант 27

 

 

1.

Два поезда вышли одновременно навстречу друг другу с двух станций.

 

 

АГ

 

 

Первый шёл со скоростью m км/ч и прошёл до встречи S км. Второй

 

прошёл до встречи P км. Какова скорость второго поезда?

 

НИ

2.

ека

 

 

Даны действительные числа а, в, с (а ¹ 0). Выяснить, имеет ли квадратное

уравнение ах2+вх+с=0 действительные корни. Если действительные корни имеются, то найти их, в противном случае ответом должно служить сообщение, что действительных корней нет.

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

о

 

 

 

3. Для заданного числа х вычислить значение произведения

 

ln

1 - x

 

ln

1 + x

 

 

 

 

ln

1 -

x

 

и

ln

 

1т+ x

 

 

 

 

 

 

 

×

 

 

 

 

 

 

 

 

×

 

 

 

 

 

 

× ... ×

 

 

 

 

 

 

 

 

2

 

 

1 .8

 

 

 

 

 

 

1 .6

 

л

 

 

 

0 .2

 

4. Вычислить значение суммы

 

 

 

 

 

 

 

б

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

x 2

 

 

x

4

 

 

x

6

 

 

 

 

x 18

 

 

 

 

 

1 +

 

+

 

+

 

+ ...

+

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

2

 

 

4

 

 

 

 

6

 

 

и

 

 

 

18

 

 

 

 

 

для одного заданного числа х.

 

б

 

 

 

 

 

 

 

 

 

 

 

5. В задании №4 значение числа

 

 

 

 

 

 

 

 

 

до 16 с шагом 2. Вычис-

 

 

х меняется от 2

 

 

 

 

 

 

 

 

 

ая

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

лить значение каждой суммы.

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

33=7+9+11нн

6*.Найти кубы первых ста натуральных чисел, используя свойство:

 

 

 

1

3

=1

 

 

 

23=3+5

 

 

 

р

 

 

 

т

 

 

 

 

к

……………о

Эл

е

 

 

 

 

 

 

 

 

 

 

 

31

 

 

 

 

 

 

Вариант 28

 

НИ

 

 

 

1. Осевое сечение цилиндра – квадрат, площадь которого Q. Найти объем

данного цилиндра.

 

АГ

 

 

 

 

2. Вычислить стоимость покупки с учётом скидки. Скидка в 3% предоставляется в том, случае, если сумма покупки больше 1000 руб., в 15% - если сумма больше 3000 руб.

3. Для заданного числа х вычислить значение произв д ния

æ Sin1

ö

æ

Sin2

 

ö

æ Sin3

 

ö

 

 

æ

Sin10

 

ö

ç

 

 

 

- x÷

× ç

 

+ x÷ ×

ç

 

 

- x

÷

×...× ç

 

+ x÷

Sin2

Sin3

 

 

Sin11

è

 

ø

è

 

ø

è Sin4

 

ø

 

 

è

 

екаø

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

о

т

 

4. Вычислить значение

 

суммы

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

æ b

 

ö æ b

 

ö æ b

 

ö

 

æ

 

b

 

ö

 

 

ç

 

 

+ 2!÷ + ç

 

 

+ 4!÷ + ç

 

+ 6!÷

+ ... + ç

 

 

 

 

+10!и÷

 

 

 

3

5

 

7

11

 

 

è

 

 

ø è

 

 

ø è

 

ø

 

è

 

ø

 

 

для одного заданного числа b.

 

 

 

б

 

 

л

 

 

 

 

5. В задании №4 значение числа

 

b

именяется от 1 до 2 с шагом 0,2. Вычис-

лить значение каждой суммы.

б

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

6*.Составить алгоритм для н хождения всех прямоугольников указанной

площади (площадь – исходноеая данное, выраженное натуральным числом), стороны которого – натуральные числа.

 

 

 

 

1

× 12

нн

 

 

 

 

2

× 6

 

 

 

 

 

3

 

о

 

 

 

 

 

× 4

 

 

 

к

т

р

 

 

 

е

 

 

 

 

Эл

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

32

Например, если площадь равна 12, то получим три разных прямоугольника:

Часть II. ПРОГРАММИРОВАНИЕ

АГ

 

В каждом варианте этой части содержатся задачи на алгоритмы: НИ

∙ линейной структуры – задача под номером 1,

 

ека

 

∙ разветвляющейся структуры – задача под номером 2,

∙ циклической структуры – задача под номером 3.

 

 

При решении контрольной или лабораторной работы необходимо пра-

 

 

 

 

 

 

 

 

 

 

 

 

 

т

вильно разработать алгоритмы задач и выразить их на языке программиро-

 

 

 

 

 

 

 

 

 

 

 

 

о

 

вания PASCAL, т.е. непосредственно в виде программ.

 

 

 

 

 

 

 

 

 

 

 

и

 

 

 

Номер варианта выбирается по последним двум цифрам в зачетной

 

 

 

 

 

 

 

 

 

 

л

 

 

 

книжке, либо на усмотрение самого преподавателя.

 

После условия каждой задачи представ ен рекомендуемый вид экрана

во время работы программы:

 

и

 

 

 

 

полужирным шрифтом выделены данные,

 

 

 

 

 

 

 

 

б

 

 

 

 

 

которые будут вводиться пользователемб.

 

 

 

 

 

 

 

 

 

 

нн

ая

 

 

 

 

 

 

 

 

 

т

р

о

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

к

 

 

 

 

 

 

 

 

 

 

е

 

 

 

 

 

 

 

 

 

 

Эл

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

33

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

СРЕДА ПРОГРАММИРОВАНИЯ TURBO PASCAL 7.0

Для языка Паскаль наиболее распространенными являются две средыНИ

программирования: Turbo Pascal 7.0 и Borland Pascal для MS-DOS и Windows. Они предназначены для подготовки текстов программАГи их вы-

полнения. Принципы составления программ, кроме работы с графикой в Windows, для них одинаковы. Основные файлы среды Turbo Pascal 7.0 такие:

∙ turbo.exe (основной выполняемый файл)

turbo.tpl (библиотека)

 

о

т

ека

 

 

turbo.tph (помощь)

и

 

 

 

 

 

 

 

graph.tpu (модуль для работы с график й)

 

рых функциональных клавиш.

 

 

л

Чтоб активизировать главное менюб, необходимо нажать на клавишу

F10.

 

 

 

 

 

 

и

 

 

 

 

 

 

 

 

 

В распоряжении пользователя будут такие пункты меню:

 

 

 

 

 

 

б

 

 

 

File

 

- для работы с файлами;

 

 

Edit

 

- для ред ктирования файла;

 

Search

 

- для поискааяили замены заданного фрагмента текста;

 

Run

 

- для выполнения программы;

 

Compile - для компиляции программы и создания ехе-файла;

 

 

 

 

 

нн

 

 

 

 

Debug

 

- для настройки программы;

 

 

 

 

о

 

 

 

 

 

Options

- для конфигурирования среды;

 

 

 

р

 

 

 

 

 

 

Windowт

- конфигурации окон и работы с ними;

 

Help

 

-для вызова помощи.

 

Эл

е

к

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

34

 

Для входа в среду нужно выполнить команду turbo.exe. В верхней строке экрана размещено главное меню, а в нижней - описание некото-

Необходимый пункт выбирают стрелками перемещения курсора или мышью и нажимают клавишу ввода. Можно воспользоваться и комбинацией клавиш Alt + <высвеченная буква>: нажав и удерживая клавишу

Alt, нажимают клавишу с высвеченной буквой и отпускают обе клавиши.

 

АГ

НИ

Основные этапы сеанса работы

 

 

 

в среде программирования Turbo Pascal 7.0

 

ека

 

 

1. Активизируют главное меню (нажимают на F10) и пун т File. В нис-

 

падающем меню выбирают команду New. Ср да п реходит в режим

 

 

 

 

 

 

 

 

 

 

 

 

 

т

 

создания нового файла с именем NONAMEOO.PAS. Набирают

 

текст программы.

 

 

 

 

 

и

о

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

2. Для исправления очевидных ошибок ввода пользуются традицион-

 

 

 

 

 

 

 

 

 

 

л

 

 

 

 

ными приёмами редактирования текста.

 

 

 

 

 

 

 

 

 

 

 

б

 

 

 

 

3. Если очевидных ошибок нет, программу можно компилировать и

 

 

 

 

 

 

 

 

и

 

 

 

 

 

 

выполнять командами F10=>Run=>Run или при помощи комбина-

 

ции клавиш Ctrl+F9.

б

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Если система найдет синтаксические ошибки, то об этом будет со-

 

 

 

 

 

 

ая

 

 

 

 

 

 

 

 

общено. Курсор будет находиться в строке, где допущена ошибка,

 

или непосредственно указывать на позицию с ошибкой. В верхней

 

 

 

 

 

нн

 

 

 

 

 

 

 

 

 

строке будет сообщение красного цвета о содержании ошибки, что

 

существенно облегчает её исправление.

 

 

4.

 

 

 

о

 

 

 

 

 

 

 

 

 

Среда будет аходиться в режиме редактирования и ошибку легко

 

 

 

р

 

 

 

 

 

 

 

 

 

 

 

исправить. Ошибку исправляют. Теперь повторно компилируют и

 

 

 

т

 

 

 

 

 

 

 

 

 

 

 

выполняют программу (нажимают на Ctrl+F9). Исправляют сле-

 

 

к

 

 

 

 

 

 

 

 

 

 

 

 

дующую ошибку и т.д.

 

 

 

 

 

 

 

5.

е

 

 

 

 

 

 

 

 

 

 

 

 

Если синтаксических ошибок нет, программа будет выполнена. Все

Эл

 

 

 

 

 

 

 

 

 

 

 

 

 

р зультаты можно увидеть в окне результатов, для чего нажимают на Alt+F5 или используют методы пункта Debug. Нажав после пе-

35

 

 

 

 

 

 

 

 

 

 

 

НИ

 

ресмотра результатов на любую клавишу, переходят в режим редак-

 

тирования программы.

 

 

 

 

 

 

 

 

 

 

6.

Для создания ехе-файл последовательно выполняют

АГ

 

 

F10 => Compile => Destination => Disk.

 

 

 

 

 

 

 

 

 

 

 

Нажимают на Alt+F9 и в текущий каталог на диске будет записан

 

ехе-файл, который можно выполнять вне среды программирования.

7.

 

 

 

 

 

 

 

 

ека

 

 

Чтобы сохранить текст программы в файле с расширением .pas, ак-

 

тивизируют:

 

 

 

 

 

 

 

 

 

 

 

F10 => File => Save As, если файлу дают новое имя

 

 

 

 

 

 

 

 

 

о

 

 

 

 

 

F10 => File=> Save (достаточно нажа ь на клавишу F2) для со-

 

хранения файла под старым именем.

 

т

 

 

 

8.

 

 

 

 

 

и

 

з среды необходимо вы-

Для завершения сеанса работы и выхода

 

 

 

 

 

 

л

 

 

 

 

 

 

 

полнить F10 => File => Exit или нажать на клавиши Alt+X.

 

9.

 

 

 

б

 

 

 

 

 

 

 

Для работы с программой, которая находится на диске, выполняют

 

 

 

и

 

 

 

 

 

 

 

 

 

F10 => File => Open или наж мают клавишу F3. При помощи кла-

 

 

б

 

 

 

 

 

 

 

 

 

 

виши Tab переходят в нижнее окно и выбирают из меню имен фай-

 

лов нужный файл, нажимают на клавишу ввода. Текст программы

 

ая

 

 

 

 

 

 

 

 

 

 

 

будет занесён в окно редактирования.

 

 

 

 

 

 

10.Окон с открытыми программами может быть несколько. Переходить

 

от одной программы к другой можно при помощи клавиши F6. Что-

 

бы развер уть а весь экран или свернуть окно, пользуются клави-

 

шей F5. Чтобы удобно для пользователя разместить окна на экране

 

 

 

 

 

 

нн

 

пользуются средствами пункта Window. Для закрытия активного

 

 

 

 

 

о

 

 

окна, нажимают на Alt+F3 или щелкают мышью на значке прямо-

 

 

 

 

р

 

 

 

угольника в левом верхнем углу рамки окна.

 

 

 

т

 

 

 

11.Если необходима дополнительная информация, нажимают на кла-

 

 

к

 

 

 

 

 

вишу F1 и читают информационно-справочные тексты о среде и

Эл

е

 

 

 

 

 

синтаксических конструкциях языка Турбо Паскаль.

 

 

 

 

 

36

 

 

 

 

 

 

 

 

НИ

Замечание. В среде Borland Pascal for Windows нет существенных от-

личий от описанных выше правил работы. Сообщения об ошибках бу-

дут в нижней части экрана. В начале программы нужно вставить ко-

 

АГ

 

манду uses WinCrt вместо uses Crt. Некоторых навыков требует работа

с навигатором файлов.

 

 

 

Коды типичных ошибок

ека

 

 

ТР 7.0 генерирует два типа сообщений об ошибках:

 

 

ошибки компиляции

 

 

 

 

 

о

т

 

 

 

 

 

 

 

 

 

 

ошибки выполнения

 

 

 

 

и

 

 

 

 

 

 

 

 

 

 

Некоторые коды ошибок компиляции:

л

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

3 Unknown identifier (Неизвестный идентификатор). Этот идентифика-

 

тор не был описан.

 

и

б

 

 

 

 

 

 

 

 

 

 

 

 

 

4

 

 

 

 

 

 

 

 

Duplicate identifier (Повторение идентификатора).

5

 

б

 

 

 

 

 

 

 

Syntax error (Синтаксическая ош бка).

 

 

 

 

14 Invalid file name (Недопустимое имя файла). Имя файла неправильное или указан несуществующий путь.

26 Type mismatch (Несоответствие типов).

42

Error in expression (Ошибка в выражении).

62

ая

Division by zero (Деле ие на нуль).

64 Cannot Read or Write variables of this type (Нет возможности считать

 

 

 

 

 

 

 

нн

 

 

или записать переменные данного типа).

85

 

 

 

 

 

о

 

«;» expected (Ожидается символ «;»).

91

 

 

 

 

р

 

 

«:=« expected (Ожидается символ «:=«).

94

 

 

 

т

 

 

 

 

«.» expected (Ожидается символ «.»).

95

 

 

к

 

 

 

 

 

«..» expected (Ожидается символ «..»).

Эл

е

 

 

 

 

 

 

 

 

 

 

37

 

 

 

 

 

 

Сообщения об ошибках выполнения:

 

 

 

 

 

НИ

 

 

 

 

 

 

∙ ошибки на уровне DOS (коды с 1 до 99);

 

 

 

 

∙ ошибки ввода-вывода (коды с 100 до 149);

 

АГ

 

∙ критические ошибки (коды с 150 до 199);

 

 

 

 

 

 

 

∙ фатальные ошибки (с 200 до 255).

 

 

 

 

 

 

2 Path not found (Путь не найден).

 

 

 

 

 

 

 

103 File not open (Файл не открыт).

 

 

 

 

 

 

 

104 File not open for input (Файл не открыт для ввода).

 

 

 

 

 

 

 

т

 

 

 

105 File not open for output (Файл не открыт для вывода).

 

 

153 Unknown command (Неизвестная команда).

 

ека

 

 

200 Division by zero (Деление на ноль).

 

 

 

 

 

 

215 Arithmetic overflow error (Ошибка во времяо

выполнения математи-

ческой операции).

 

б

л

и

 

 

 

 

 

 

 

 

 

 

б

и

 

 

 

 

 

 

 

 

 

 

 

 

 

Директ вы компилятора

 

 

 

Директивы компилятора предназначены для задания нестандартных

кой общий вид: {$<символая> <знак>}. Режимы компиляции можно задавать или отменять с помощью команд Option => Compiler => <команда

режимов компиляции программы. Рассмотрим две группы директив: ди-

рективы-переключатели и директивы с параметрами. Первые имеют та-

компилятора> или з аков "+" и "-" в директивах-переключателях. Один

 

 

 

 

 

 

нн

из режимов (чаще всего употребляемый) действует по умолчанию. По-

 

 

 

 

 

о

 

этому режимы меняют не всегда, а лишь в случае необходимости. Рас-

 

 

 

 

р

 

 

смотрим примеры директив.

 

 

 

т

 

 

 

{$А+} - выравнивание данных на границу слова, а не байта. Резервирует-

Эл

е

к

 

 

 

 

ся больше памяти, но программа выполняется быстрее. Действу-

ет по умолчанию. Команда компилятора — Word Allign Data.

 

 

 

 

 

 

38

 

 

 

 

 

 

 

 

 

НИ

{$В-} - краткая схема вычисления логического выражения. Вычисления

заканчиваются досрочно, как только результат станет очевид-

ным. По умолчанию

действует {$В+} – Complete Boolean

Evaluation.

 

АГ

 

 

 

 

{$D+} - Debug Informatin - дает

информацию о командах в тексте про-

 

ека

 

 

граммы, в которых допущены ошибки. Действует по умолчанию.

{$Е+} - Emulation - эмуляция сопроцессора программным путем. Действует по умолчанию.

 

 

 

 

 

 

 

 

т

{$F+} - Force Far Calls - "отдаленный" тип вызова проц дур и функций.

По умолчанию бездействует.

 

 

и

о

 

 

 

 

 

 

 

 

 

 

 

 

 

{$G+} - 286 Instructions - используют на машинах с процессором типа

 

 

 

 

 

л

 

 

 

80286 и только. По умолчанию не действует.

 

 

 

 

б

 

 

 

 

{$!+} - I/O Checking - программа немедленно перестанет выполняться в

 

 

 

и

 

 

 

 

 

случае ошибок ввода-вывода данных. Действует по умолчанию.

 

 

б

 

 

 

 

 

 

{$L+} - Local Symbols - генер рует debug-информацию про локальные

переменные. Действует по умолчанию.

 

 

ая

 

 

 

 

 

 

 

{$N+} - 8087/80287 - для вычислений с плавающей запятой используется

сопроцессор. Если на машине сопроцессора нет, то для таких

нн

 

 

 

 

 

 

 

 

вычислений следует отменить этот режим.

{$О+} - Overlays Allowed - генерирует оверлейный код для больших про-

 

 

 

 

о

 

 

грамм. По умолчанию не действует.

 

 

 

р

 

{$Р+} - Open Parameters - дает возможность использовать в качестве па-

 

 

 

т

 

 

 

раме ов массивы открытого типа. По умолчанию не действует.

Эл

е

к

 

 

 

 

 

 

 

 

39

 

 

 

 

Типовой пример выполнения лабораторной работы в среде Turbo Pascal

Задача. Равносторонний треугольник вращается вокруг своей стороны. Извест-

ны высота h см и площадь треугольника S см2. Найти объём получен-

НИ

ного тела вращения.

 

 

АГ

Тело вращения.

 

 

Введите исходные данные:

 

 

высоту треугольника h (см): 10

 

 

площадь треугольника S (кв.см): 125

 

 

 

Объем полученного тела вращения равен 3242.79

уб.см

Повторите запуск программы, используя другие данные: h=8.5, s=96.25

{Объем полученного тела вращения равен 2282.66екакуб.см}

 

 

 

т

 

 

После условия задачи другим шрифтом указывается текст, который дол-

 

 

 

о

 

 

 

жен отображаться на экране после запуска программы на выполнение.

 

и

 

 

 

 

 

 

 

Сначала необходимо составить алгоритмлрешения задачи,

представив его в

более наглядном виде, т.е. в виде блок-схемы. Т.к. задача геометрического плана, то

желательно составить чертёж.

б

и

б

 

 

 

 

 

 

После

 

вращения

равностороннего

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

ая

треугольника вокруг своей стороны полу-

 

 

 

 

 

 

 

чим два конуса. Таким образом, для вы-

 

 

 

 

 

 

 

числения объёма полученного тела враще-

 

 

 

 

 

 

 

 

 

 

 

 

 

h

нн

 

ния необходима формула вычисления объ-

 

 

 

 

 

 

ёма конуса:

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

1

 

 

 

 

 

 

 

 

 

 

Vk

=

πr 2 h

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

о

 

 

 

 

 

3

 

 

 

 

 

 

 

 

 

 

Из формулы видно, что для нахожде-

 

 

 

 

р

 

 

ния объёма конуса необходимо сначала

 

 

 

 

 

 

найти радиус:

 

 

 

 

т

 

 

 

 

r =

a

 

 

 

 

 

 

 

 

 

 

 

 

 

к

 

 

 

 

 

 

 

2

 

 

 

 

 

 

 

 

 

 

 

По условию задачи нам известны вы-

 

е

 

 

 

 

 

сота и площадь треугольника, следова-

 

 

 

 

 

 

тельно, радиус можно найти из формулы

 

 

 

 

 

 

 

Эл

 

 

 

 

 

 

площади треугольника:

 

 

 

 

 

 

 

 

 

1

 

 

 

 

 

 

 

 

 

 

 

 

 

 

S =

ha => a =

2×S

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

2

 

 

 

 

 

h

 

 

 

 

 

 

 

 

40