Программирование в среде Turbo Pascal 7.0. В 3 ч. Ч. 2. Программирование типовых алгоритмов
.pdf
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Продолжение табл. 5.1 |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
№ |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Диапазон и шаг |
|
|
|
|
Функция |
|
|
|
|
|
|
|
|
изменения |
|||||||||||||
варианта |
|
|
|
|
|
|
|
|
|
|
|
|
||||||||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
аргумента |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
6 |
F (x) cos2x |
|
|
|
x [–π; π] |
|||||||||||||||||||||
|
|
|
|
|
|
|
|
|
|
|
|
x 1 |
|
|
|
|
|
|
|
dx = π/6 |
||||||
7 |
F(x) e |
x |
|
|
|
|
1 |
|
|
|
|
|
|
x [–1,2; 0,6] |
||||||||||||
|
|
x |
2 |
|
|
|
dx = 0,2 |
|||||||||||||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
||||||||
8 |
F (x) e |
|
x |
|
|
1 |
|
|
|
|
|
|
x [–1,8; 1,6] |
|||||||||||||
|
|
|
ex |
|
|
|
dx = 0,2 |
|||||||||||||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|||||||
9 |
F (x) sinx cosx |
2 |
|
|
x [–π/2; π/2] |
|||||||||||||||||||||
|
|
|
dx = π/6 |
|||||||||||||||||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
10 |
F(x) e |
x |
|
|
|
|
|
1 |
|
|
|
|
|
|
x [–1,5; 1,5] |
|||||||||||
|
|
|
x |
|
2 |
|
|
|
dx = 0,25 |
|||||||||||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|||||||
11 |
F (x) |
5 |
5 |
x |
|
|
|
|
|
|
|
|
x3 |
|
|
|
x [0,2; 2,2] |
|||||||||
|
|
|
log8(1 x2) |
|
dx = 0,2 |
|||||||||||||||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|||||||||||||||
12 |
F(x) |
x |
log |
5 |
(x2 |
|
|
x2 1) |
|
x [–1,4; 1,8] |
||||||||||||||||
|
|
|
|
|
||||||||||||||||||||||
|
5 |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
dx = 0,2 |
|||||
13 |
F (x) |
|
|
|
3 |
|
|
|
|
lg2(x 2) |
|
x [–0,4; 1,2] |
||||||||||||||
|
|
|
x2 1 |
|
||||||||||||||||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
dx = 0,2 |
||||||
|
|
|
|
|
|
|
|
|
|
2 |
|
|
|
|
|
|
|
1 |
|
|
|
|
|
x [–π; π] |
||
14 |
F (x) |
|
cos x |
|
|
|
dx = π/6 |
|||||||||||||||||||
x2 |
|
|
|
|||||||||||||||||||||||
15 |
F(x) |
|
|
|
|
|
|
x3 |
|
|
|
|
|
|
|
|
|
x [–1,8; 1,6] |
||||||||
|
|
|
7 x |
2 |
|
|
|
|
|
dx = 0,2 |
||||||||||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|||||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Задание Б.
Разработать алгоритм и составить программу вычисления циклом с постусловием бесконечной суммы по варианту задания из табл. 5.2. Начальное значение переменной, шаг ее приращения и точность вычисления суммы вводятся с клавиатуры по запросу
40
программы. Промежуточные значения переменной и слагаемых выводятся на дисплей по формату с фиксированной десятичной точкой. Накопление суммы прекращается, когда значение последнего вычисленного слагаемого становится соизмеримым по абсолютной величине с заданной точностью. Программа должна зафиксировать, сколько раз выполнился цикл до достижения заданной точности вычислений. Значение последнего слагаемого и заданной точности вычислений, а также значение суммы и количество выполненных повторений вывести на дисплей и в текстовый файл.
Таблица 5.2
Варианты задания Б
№ |
Выражение |
|
|
|
|
|
|||||||||||
варианта |
|
|
|
|
|
||||||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
||
1 |
S |
|
|
|
2x 2 |
|
|
|
|
|
|||||||
|
3x3 x2 |
||||||||||||||||
|
x |
|
|||||||||||||||
2 |
S |
3x2 2 |
|||||||||||||||
|
5ex x |
||||||||||||||||
|
x |
|
|
||||||||||||||
3 |
S |
|
|
|
2x2 x |
||||||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|||
|
x 3x3 4x2 |
||||||||||||||||
|
S |
|
|
|
x2 2x |
||||||||||||
4 |
|
|
|
|
|
|
x |
|
3 |
|
|
|
|||||
x |
ex 3 |
|
|
|
|
||||||||||||
|
|
|
|
|
|
|
|||||||||||
|
|
|
|
|
|
|
|
|
|
||||||||
|
|
|
|
2 |
|
|
|
|
|
|
|
||||||
5 |
S |
|
|
x e x |
|
|
|
|
|
||||||||
|
|
x3 ex |
|
|
|
|
|
||||||||||
x |
|
|
|
|
|
|
|
|
|||||||||
6 |
S |
2x 1 |
|
|
|
|
|
||||||||||
|
|
|
|
|
|
|
|||||||||||
x |
|
|
|
xx |
x |
|
|
|
|
|
|
||||||
|
|
|
|
|
|
|
|
|
|||||||||
|
|
|
|
3 |
|
|
|
|
|
|
|
||||||
7 |
S 1 n |
n 2 |
|
||||||||||||||
nn 1 |
|||||||||||||||||
|
n |
|
|
|
|
||||||||||||
Исходные
данные
xнач = 0,5 dx = 0,5
xнач = 0,5 dx = 0,5
xнач = 1
dx = 0,5
xнач = 0,5 dx = 0,25
xнач = 0,5 dx = 0,25
xнач = 0,5 dx = 0,5
nнач = 1
dn = 1
Точность
вычислений
= 10–3
= 10–3
= 10–3
= 10–3
= 10–4
= 10–3
= 10–4
41
№ |
Выражение |
|
|
|
|
|||||||
варианта |
|
|
|
|
||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
8 |
|
|
|
|
|
n n |
||||||
S ( 1)n |
|
|
|
2 |
|
|
||||||
|
nn |
|
|
|
|
|||||||
|
n |
|
|
|
|
|
|
|
|
|
||
9 |
|
|
|
|
|
n2 |
5 |
|
|
|
||
S ( 1)n |
|
|
|
n |
|
|
||||||
|
nn |
|
||||||||||
|
n |
|
|
|
|
|
|
|
|
|
||
|
|
|
|
nn 1 n |
||||||||
10 |
S |
( 1) |
n |
|
|
|
2 |
|
||||
|
|
|
nn |
|
|
|
|
|
|
|||
|
n |
|
|
|
|
|
2n |
|||||
|
|
|
|
|
|
2 |
|
|||||
|
|
|
|
|
|
|
|
|
|
|
|
|
11S n ( 1)n (n 1)(kn 2) n
12S n ( 1)n (n 1)(n k 2)(n 3) 2n
13 |
S ( 1)n |
|
k n |
|
||||
k 2n 2 |
||||||||
|
n |
|||||||
14 |
S 1 n 1 |
2n 3 |
|
|
||||
5n3 n2 |
||||||||
|
n |
|
||||||
15 |
S 1 n 1 |
5n2 n |
|
|||||
|
||||||||
|
n |
4n3 3n2 |
||||||
Окончание табл. 5.2
Исходные
данные
nнач = 1
dn = 1
nнач = 1
dn = 1
nнач = 2
dn = 1
k = 2
nнач = 1
dn = 1 k = 3
nнач = 1
dn = 1 k = 2
nнач = 1
dn = 1
nнач = 1
dn = 1
nнач = 2
dn = 1
Точность
вычислений
=10–3
= 10–4
= 10–3
=10–3
= 10–3
= 10–3
= 10–3
= 10–3
Задание В.
Разработать алгоритм и составить программу вычисления циклом с параметром суммы первых n членов степенного ряда по варианту задания из табл. 5.3. Значения переменной x и количество n членов степенного ряда вводятся с клавиатуры. Начальное значение nнач = 1, шаг приращения dn = 1. Если в степенном ряде исполь-
42
зуется факториал, то вычисление факториала также выполнить с использованием цикла с параметром.
№
варианта
1
2
3
4
5
6
7
8
9
10
11
Варианты задания В |
|
|
|
|
|
||||||||||||
|
|
|
|
|
|
|
|
Степенной ряд |
|
|
|
|
|
||||
y 1 cosx |
cos2x |
|
cosnx |
|
|||||||||||||
|
|||||||||||||||||
|
|
|
|
|
|
1! |
|
2! |
|
|
|
|
n ! |
|
|
||
y 1 |
|
x2 |
|
3x4 |
( 1) |
n |
2n 1 |
x |
|||||||||
2! |
4! |
|
(2n)! |
||||||||||||||
|
|
|
|
|
|
|
|
|
|
|
|||||||
y |
x3 |
|
|
x5 |
( 1) |
n 1 |
x2n 1 |
|
|
||||||||
|
5 |
17 |
|
|
4n2 1 |
||||||||||||
|
|
|
|
|
|
|
|
|
|||||||||
y 1 cos(π/ 4) x |
cos(nπ/ 4) |
||||||||||||||||
|
|
|
|
|
1! |
|
|
|
|
|
n ! |
|
|
||||
Таблица 5.3
2n
xn
y |
1 |
|
1 |
|
|
1 |
|
(1)n |
1 |
|
|||||
x |
3x3 |
5x5 |
(2n 1)x2n 1 |
||||||||||||
|
|
|
|
|
|||||||||||
y x |
|
x3 |
|
|
x5 |
|
( 1) |
n 1 x2n 1 |
|||||||
|
|
|
|
|
|
|
|
|
|||||||
|
3! |
|
5! |
|
|
|
(2n 1)! |
||||||||
|
|
|
|
|
|
|
|
|
|
||||||
y 1 |
|
x2 |
|
|
x4 |
|
|
x6 |
|
|
( 1)n |
x2n |
|
|
|
|||||||||||||||||||||
|
|
|
|
|
|
|
|
|
|
|
2n ! |
|||||||||||||||||||||||||
|
|
|
2! |
|
4! |
|
|
|
|
|
6! |
|
|
|
|
|
|
|
|
|||||||||||||||||
y x |
|
|
x2 |
|
|
|
x3 |
|
|
x4 |
|
( 1) |
n 1 |
|
xn 1 |
|||||||||||||||||||||
1 |
2 |
|
2 4 |
3 8 |
|
|
n |
2n |
||||||||||||||||||||||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
||||||||||||||||||||||||
|
y |
xlnx |
|
xlnx 2 |
(xlnx)n |
|
|
|
||||||||||||||||||||||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|||||||||||||||||||||||||
|
|
|
|
|
|
|
1! |
|
|
|
|
|
|
|
|
2! |
|
|
|
|
|
|
n! |
|
|
|
|
|
|
|||||||
y x |
x2 |
|
|
x3 |
|
x4 |
( 1)n 1 |
xn |
|
|
||||||||||||||||||||||||||
|
|
|
|
|
|
|
|
|
||||||||||||||||||||||||||||
|
|
|
|
|
|
|
2 |
3 |
x2 |
|
4 |
x3 |
|
xn |
|
|
|
n |
|
|
|
|||||||||||||||
|
|
|
y x |
|
|
|
|
|
|
|
|
|
|
|
||||||||||||||||||||||
|
|
|
|
|
|
n |
|
|
|
|
|
|
||||||||||||||||||||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
2 |
|
|
|
|
|
|
3 |
|
|
|
|
|
|
|
|
||||
43
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Окончание табл. 5.3 |
|||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
№ |
|
|
|
|
|
Степенной ряд |
|
|
|
|
|
|
||||||||||
варианта |
|
|
|
|
|
|
|
|
|
|
|
|||||||||||
|
|
|
|
|
x3 |
|
|
|
|
x5 |
|
|
|
x2n 1 |
|
|
|
|||||
12 |
y x |
|
|
|
|
|
|
|||||||||||||||
3! |
|
|
2n 1 ! |
|
||||||||||||||||||
|
|
|
|
|
|
|
|
5! |
|
|
|
|||||||||||
13 |
y x |
x3 |
|
x5 |
|
( 1)n 1 |
x2n 1 |
|
||||||||||||||
|
|
|
|
2n 1 ! |
|
|||||||||||||||||
|
3 |
|
|
5 |
|
|
|
|
|
|
|
|
|
|
||||||||
14 |
y x |
x3 |
|
|
x5 |
( 1)n |
|
xn 2 |
|
|
||||||||||||
|
|
|
(2n 1)! |
|
||||||||||||||||||
|
3! |
|
5! |
|
|
|
|
|
|
|
||||||||||||
15 |
(x 1)2 |
|
(x 1)3 |
|
|
( 1) |
n 1(x 1)n |
|||||||||||||||
y (x 1) 2 |
|
|
|
|
|
|
|
|
|
|
|
|||||||||||
|
3 |
|
|
n |
||||||||||||||||||
|
|
|
|
|||||||||||||||||||
Содержание отчета
1.Цель работы.
2.Задание на лабораторную работу.
3.Блок-схема алгоритма.
4.Распечатка текста программы.
5.Распечатка результатов из текстового файла.
6.Выводы.
44
СПИСОК ИСПОЛЬЗОВАННЫХ ИСТОЧНИКОВ
1.Офицеров, Д. В. Программирование на персональных ЭВМ. Практикум: учебное пособие / Д. В. Офицеров, А. Б. Долгий,
В. А. Старых. Минск: Выш. шк., 1993. 256 с.
2.Бармин, В. А. Вычислительная техника и программирование:
в2 ч. / В. А. Бармин, А. П. Киселева, В. В. Трикозенко. Минск:
БНТУ, 1998. Ч. 1: Программирование в среде |
TURBO |
PASCAL 7.0. 116 с. |
|
3.Лабораторный практикум по программированию |
на языке |
Паскаль: учебное пособие. / Л. В. Найханова [и др.]; под общ. ред. Л. В. Найхановой, Н. Ц. Бильгаевой. 3-е изд. доп. и перераб.
Улан-Удэ, 2004. 176 с.
4.Фаронов, В. В. Программирование на персональных ЭВМ в среде Турбо–Паскаль / В. В. Фаронов. Москва: МГТУ, 1990. 580 с.
45
СОДЕРЖАНИЕ |
|
ВВЕДЕНИЕ............................................................................................. |
3 |
Лабораторная работа № 1 |
|
ТИПЫ ДАНЫХ....................................................................................... |
4 |
Лабораторная работа № 2 |
|
ВВОД-ВЫВОД ДАННЫХ................................................................... |
12 |
Лабораторная работа № 3 |
|
ПРОГРАММИРОВАНИЕ ЛИНЕЙНЫХ АЛГОРИМОВ.................. |
17 |
Лабораторная работа № 4 |
|
ПРОГРАММИРОВАНИЕ РАЗВЕТВЛЯЮЩИХСЯ |
|
АЛГОРИТМОВ..................................................................................... |
24 |
Лабораторная работа № 5 |
|
ПРОГРАММИРОВАНИЕ ЦИКЛИЧЕСКИХ АЛГОРИТМОВ ........ |
34 |
СПИСОК ИСПОЛЬЗОВАННЫХ ИСТОЧНИКОВ........................... |
45 |
46
Учебное издание
ПРОГРАММИРОВАНИЕ В СРЕДЕ
TURBO PASCAL 7.0
Лабораторный практикум
В 3 частях
Часть 2
ПРОГРАММИРОВАНИЕ ТИПОВЫХ АЛГОРИТМОВ
Составитель ПЕТРЕНКО Станислав Михайлович
Редактор Е. С. Кочерго
Компьютерная верстка Е. А. Беспанской
Подписано в печать 28.02.2018. Формат 60 84 1/16. Бумага офсетная. Ризография. Усл. печ. л. 2,73. Уч.-изд. л. 2,14. Тираж 100. Заказ 587.
Издатель и полиграфическое исполнение: Белорусский национальный технический университет. Свидетельство о государственной регистрации издателя, изготовителя, распространителя печатных изданий № 1/173 от 12.02.2014. Пр. Независимости, 65. 220013, г. Минск.
47