Добавил:
ivanov666
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз:
Предмет:
Файл:Алгоритмизация и языки программирования. Учебно-методический комплекс.pdf
10. Написать программу удаления из списка элементов, зна-
НОМЕР
ВАРИАНТА
ИСХОДНЫЕ
ДАННЫЕ
1
Определить расстояние d между двумя точками
на плоскости
х1, у1, Х2, У2
2
Заданы 4 числа. Вычислить среднее арифмети-
ческое и среднее геометрическое модулей
a, в, c, d
3
Найти радиус окружности, описанной вокруг
где р - полупериметр
а, в, с
R
a b c
p p a p b p c
=
− − −
* *
* *( )*( )*( )4
чения которых больше некоторого заданного.
4. Краткое описание семинарских и практических занятий
(планы, задания для проведения семинарских и
практических занятий, СРСП, СРС)
Тема 1. Структура программы на паскале.
Заголовок программы. Блок. Типы данных, их классификация.
Переменные и константы. Синтаксис выражений.
Порядок работы
1. Войти в среду Turbo Pascal.
2. Войти в среду редактора.
3. Выполнить работу по набору текста программы для задачи 1
(табл.1).
4. Сохранить файл на диске с желаемым именем.
5. Запустить компиляцию программы. Добиться успешной
компиляции.
6. Запустить программу на выполнение. Получить результаты.
7. Написать и выполнить программу для задачи 2. Вычислить
значение арифметического выражения (табл.2).
Содержание отчета
Отчет по лабораторной работе должен содержать условия, алгорит-
мы, тексты программ, исходные данные и результаты по двум задачам.
Таблица 1
УСЛОВИЕ
прямоугольника по формуле:
,
131
4
Найти радиус круга, вписанного в треугольник со
сторонами а, в, с по формуле:
а, в, с
5
Определить площадь треугольника по трем углам
A, B, C, h
6
Определить площадь треугольника по заданной
A, B, C, a
7
Вычислить сопротивление цепи:
R1, R2, R3
8
Вычислить сопротивление цепи:
R1, R2, R3
9
По двум сторонам и углу между ними в
A, B, α
10
В магазине продается костюмная ткань. Ее
Х, У, в
11
Найти площадь ромба по стороне и острому
а, α
12
В арифметической прогрессии известны 1-й член
а1, d
13
Найти координаты центра отрезка, заданного
Х1, У1, Х2, У2
14
Найти сумму всех натуральных чисел от 1 до m
r
p a p b p c
p
=
− − −( )*( )*( )
S
h A
B C
=
2
2
*sin( )
*sin( ) *sin( )
S
a B C
A
=
2
2
*sin( ) *sin( )
*sin( )
C A B A B
2 2 2
2= + − * * *cos
α
S a
=2sin
α
, где р - полупериметр
и высоте:
стороне и углам:
треугольнике АВС найти два остальных угла и
третью сторону.
цена в руб. за кв. метр. Подсчитать стоимость
куска этой ткани длиной Х м и шириной У м.
углу:
,
где а - сторона , α-угол
и разность. Найти 30-й член этой прогрессии и
сумму первых 40 членов.
координатами его концов.
используя формулу суммы членов
арифметической прогрессии.
132
Таблица 2
1 x, y
2
c, x, y
3
b, x, y
4
x, y, z
5
x, y, z
6
x, y, z
7 x, y
8
x, y, z
9
x, y, z
10
x, y, z
11
x, y, z
12
x, y
13
x, y
14
x, y
a
y x
e
x
x y
=
+
−
+
ln(
).
(sin( )
)
( )
b c y x x c y
= + − −( ).(cos( ) )
2
c arctg x e
x y
x y
xy
b
= − +
+
+
( ) .
( )
3
5
05
d
e
tg z
arctg y
x
x
x y
=
+
+
−
.
( )
( )
ln( )
e
x y
tg z
x y
=
−
+
(cos( ) sin( ))
( )
ln ( * *
3
2
f y x e
z y
y z y x
x y
= + + −
+ −
3 2
2
.sin ( )
/( )
g
x
y
e y
x y
x
x
=
+ +
− +
+
1
2
1
2 2
3
cos(
)
/(
*
)
*
arcsin(
h
x
y
z x
= + + +
+
2
2 2
1 2
3
2
3
4
(ln( ) )*
j y
z
y x
=
+
−
−
(( ).
sin (
) )
1
5
2
3
k y x x
y
z x
= − −
+
ln ( ) *(
/
)
2
4
i x
x y e
x
yz
= + +
+ −
−
05 3
5 0 1
. * *cos( ) *
.
m tg x x y e
x
= − + +
−
3 1
4
* ( )*lg( ) /
n e tg x y x y x
x
= + + + +( ) *(lg( ) cos( * )1
3
НОМЕР
ВАРИАНТА
УСЛОВИЕ
ИСХОДНЫЕ
ДАННЫЕ
x y
x e
p
=
lg( )
2 3
y x y
+ + −
+
−
ln( )2
Тема 2 конструкция операторов разветвления
Порядок работы
1. Разработать алгоритм, программу для примеров из табл.3.
Проанализировать результаты.
2. Составить программу для примера (табл.4) с использованием
оператора CASE. Выполнить ее и проанализировать результаты.
133
Содержание отчета
1
Три точки на плоскости заданы своими
на максимальном расстоянии друг от друга
х1, у1,
х3, у3
2
Вычислить:
a, b, c
3
Заданы три величины а,b,c. Определить макси-
cуммы экспонент exp(a) + exp(b) + exp(c)
a, b, c
4
Определить в какой четверти координатной
плоскости находится точка с координатами х,у
х,у
5
x, y, z
6 x, y
7
x, y, z
8
v x y y x
= − −
max(min( ,
), )
0
x, y
9
Вычислить значение функции, заданной
х
10
Вычислить значение функции, заданной гра-
11
Решить линейное уравнение ах + b = 0 для
a,b
max ( , , ) min ( , , )
3 2
a b c a b c
+
m
x y z
x y
= +
max( , , )
min( , )
5
z
x y
y x
=
−min( , ) min( , )
max ( , )
0 0
2
r
x
y z
=
max(min(
, ),
)
3
Отчет по лабораторной работе должен содержать условия,
алгоритмы, тексты программ, исходные данные и результаты по двум
задачам.
Таблица 3
НОМЕР
ВАРИАНТА
УСЛОВИЕ
координатами. Выяснить какие из них находятся
мальное и минимальное значение из их среднего
геометрического, среднего арифметического и
ИСХОДНЫЕ
ДАННЫЕ
х2, у2,
графически, по заданному значению аргумента х
фически, по заданному значению аргумента х:
любых значений коэффициентов.
134
12
Проверьте, делится ли выбранное число на 5,
на 11 или 13
х
13
Определить попадет ли точка с координатами
(х,у) в кольцо с внутренним радиусом R1 и
координат
х,у
14 x, y
НОМЕР
1
Установить название дня недели по его номеру,
например, 1 - понедельник, 2 - вторник и т.д.
N 2
Определить название месяца по его номеру,
например, 1 - январь, 2 - февраль и т.д.
N
3
Определить название заданной цифры,
например 1 - один, 5 - пять т.д.
N
4
Дано русское название языка
Паскаль Pascal, Пролог- Prolog.
x
5
Определить английское название заданной
цифры, например, 1-one, 5-fave и т.д.
N
6
Определить название отметки, заданной числом,
О
7
Группу детей, приехавшую в оздоровительный
каждому ребенку определять свой отряд.
N
8
Установить английское название дня недели по
его номеру, например, 1-Sunday, 2-Monday и т.д.
N
9
Определить назначение функ-циональных
помощь, F2 - пользовательское меню и т.д.
F
10
Определить английское название месяца по его
N
w x y x y
= +max (max( * , ), )20
внешним радиусом R2 с центром в начале
Таблица 4
ВАРИАНТА
УСЛОВИЕ
программирования. Определить его английский
эквивалент, например: Бейсик - Basic. Для
определения использовать таблицу:
Бейсик - Basic, Лисп - Lisp,
Си - С, Фортран - Fortran,
Ада - Ada, Пл/1 - PL/1,
ИСХОДНЫЕ
ДАННЫЕ
например, 5-отлично, 2-неудовлетворительно
лагерь, распре-деляют по отрядам по принципу:
с 6 до 7 лет - 5-й отряд
с 7 до 9 лет - 4-й отряд
с 9 до 11 лет - 3-й отряд
с 11 до 13 лет - 2-й отряд
с 13 до 15 лет - 1-й отряд
Составьте программу, которая позволила бы
клавиш в Norton Commander, например, F1-
номеру, например,1 - january, 2 - february и т.д.
135
11
Определить название операции отношения по ее
изображению, например, = - равно, < > - не равно,
>= - не меньше и т.д.
L
12
Определить служебное слово для обозначения
исключающее ИЛИ - XOR и т.д.
L
13
Установить название цвета в модуле CRT языка
например, 0 - black, 1 - blue, 2 - green и т.д.
С 14
Установить название вида линий в модуле
сплошная, 1 - точечная и т.д.
НОМЕР
ВАРИАНТА
1
Найти все трехзначные числа, равные сумме кубов своих цифр.
2
Найти все двузначные числа, сумма цифр которых не меняется
при умножении числа на 2,3,4,5,6,7,8,9.
3
Найти все трехзначные числа, сумма цифр которых равна
данному целому числу.
4
Найти все трехзначные числа, квадраты которых оканчиваются
тремя одинаковыми цифрами, отличными от нуля.
5
В магазине имеется мастика в ящиках по 16 кг, 17 кг и 21 кг.
варианты.
6
Представить в записи 42*4* вместо звездочек такие цифры,
чтобы полученное пятизначное число делилось на 72.
7
Найти все трехзначные числа кратные 7 и сумма цифр которых
тоже кратна 7.
одной из стандартных логических операций в
Паскале, например, отрицание - not,
программирования Паскаль по его номеру,
Graph Паскаля его номеру, например, 0 -
Тема 3. Конструкция операторов цикла
Порядок работы
1. Разработать алгоритм и программу для примеров из табл.5.
Выполнить программу, проанализировать результаты.
2. Разработать алгоритм и программу для вычисления суммы с
заданным числом членов (табл.6). Получить результат.
Содержание отчета
Отчет по лабораторной работе должен содержать условия,
алгоритмы, тексты программ, исходные данные и результаты по двум
примерам.
УСЛОВИЕ
Таблица 5
Получить 185 кг мастики без вскрытия ящиков. Рассмотреть все
136
8
Найти четырехзначное число, которое при делении на 133 дает в
остатке 125, а при делении на 134 дает в остатке 111.
9
Решить арифметический ребус КИО*ИО= ТОКИО. Вместо
каждой буквы необходимо поставить некоторую цифру, причем
буквы - различные цифры.
10
Сократить дробь, имеющую данные числитель а и знаменатель b.
Предусмотреть выделение целой части в случае a > b.
11
Определить сколько делителей и какие имеет данное натуральное
число.
12
Найти сумму делителей данного натурального числа.
13
Найти все "пифагоровы" тройки натуральных чисел, наибольшее
квадрату третьего).
14
Найти все четырехзначные числа, у которых сумма первых двух
цифр равна сумме двух последних.
НОМЕР
ВАРИАНТА
1
2
3
4
5
6
7
8
9
10
11
12
s
=
+ +
+ +
1
1
1
1
2
1
3
! !
!
...
s
=
− + −
+1
1
1
1
2
1
3! ! !
..
.
s
= + +
+ +1
12141
8
...
s
= − + − +1
11121
3
...
s
= − +
− +1
12141
8
.
..
s
=
+ + +
1
1 3
1
2 4
1
3 5
* * *
...
s
=
− + −
+1
1
1
131
5
...
s
= + + +
1
1 212 313 4* * *
...
s
= + + +
1
1 3
1
3 5
1
5 7* * *
..
.
s x
x
x x
= + + + +
3 5 7
3
5 7
..
.
s x
x x
= − + − +1
2 3
2 3
! !
...
s
= + + +
1
2 323 434 5* * *
...
одинаковые буквы означают одинаковые цифры, а различные
из которых не превосходит N (Тройка натуральных чисел
называется пифагоровой, если сумма квадратов двух из них равна
Таблица 6
УСЛОВИЕ
137
Тема 4. Конструкция циклов с предусловием и постусловием
НОМЕР
ВАРИАНТА
УСЛОВИЕ
Вычислить квадратный корень из заданного числа х с точностью
2
k
k)exp(
значение выражения становится больше заданного числа П.
3
Найти наибольшую степень двойки, не привы-шающую
заданного числа n.
4
Вычислить кубический корень из числа m методом Ньтона по
)*2(*
3
1
2
1
1−−
+=
n
nn
x
m
xx
станет меньше заданной точности Е.
5
Кaщей Бессмертный зарыл клад на глубину 1 м. Этого ему
закапывания клада, пренебречь).
6
Два параллельных зеркала А и В обращены друг к другу. При
на зеркало А.
y y
x
y
y
n n
n
n
=
+ −
−
−
−
1
1
1
1
2
*
(
)
x x
n n
−
−1
Порядок работы
1. Разработать алгоритм и программу примеров из табл.7.
Выполнить программу, проанализировать результаты.
2. Разработать алгоритм и программу для вычисления суммы с
заданной точностью (табл.8). Получить результат.
Содержание отчета
Отчет по лабораторной работе должен содержать условия,
алгоритмы, тексты программ, исходные данные и результаты по двум
примерам.
Таблица 7
1
Е по итерационному методу Ньютона по формуле:
Для выражения
определить наименьшее k, при котором
формуле:
Вычисления продолжать пока не
показалось не достаточно, он отрыл клад, углубил колодец до 2 м
и снова зарыл. Этого ему опять показалось мало, он отрыл клад,
углубил колодец до 3 м и зарыл. Затем он проделал тоже, углубив
колодец до 4 м, потом до 5 м, 6 м и т.д. Известно, что колодец
глубиной N метров Кощей вырывает за N^2 дней. Известно
также, что на 1001-й день Кащей умер от непосильной работы. На
какой глубине остался клад? (Временем, необходимым для
падении луча на зеркало А он ослабляется на Т[%], а при его
падении на зеркало В -на Р[%]. Определить, после скольких
отражений луч, попеременно отражаясь то от зеркала А,то от
зеркала В, ослабеет более чем в 50 раз. Первоначально он попадает
138
7
В водохранилище каждые сутки поступает Т [м3] воды, а расхо-
дуется R [ м
на Р [%] заданного первоначального объема V0. Принять А = 100.
8
На железнодорожном пути находится N разрозненных вагонов. К
Определить, сколько вагонов окажутся сцепленными.
9
Найти наибольшую степень 3, не привышающую заданного
числа m.
10
1−
+
=
kk
yx
k
y
Вычисления производить до тех пор, пока у >= z.x,y,z вводятся.
11
Найти число в последовательности Фибоначчи большее
F(k-1) + F(k-2), k > 2
12
Найти наименьшее общее кратное двух чисел.
13
Извлечь корень степени m из числа х, воспользовавшись
точности Е.
14
значение выражения становится больше заданного числа m.
НОМЕР
ВАРИАНТА
2
y
m
m y
x
y
n n
n
m
= − +
−
−
−
1
1
1
1
1
(( ) )
y y
n n
−
−1
5
k
k
s
= + + +
1
1 313
515 7* *
*
.
..
s
x x x
= + + + +1
1 2 3
2 3
! ! !
...
точно теряется А (1-EXP(-V)) [м
3
] на орошение полей и испарение, к тому же ежесу-
3
] воды на просачивание в почву,
где А - коэффициент , V - объем воды в водохранилище. Определить, за сколько дней объем воды в водохранилище уменьшится
ним движется вагон с кинетической энергией W, он сцепляется с
ближайшим вагоном, затем вместе с ним движется дальше,
сцепляясь с очередным вагоном, и т.д. При каждой сцепке расходуется 20% имеющейся кинетической энергии, еще Р[ Дж ]
затрачивается на то, чтобы стронуть с места неподвижный вагон и,
если энергия не истрачена полностью, движение продолжается.
Вычислить значения функции
для k = 1,2 ...
заданного числа М и его порядковый номер. Члены ряда
Фибоначчи вычисляются по формуле: F(1) = F(2) = 1, F(k) =
итерационной формулой:
Вычисления продолжать пока не станет меньше заданной
Для выражения определить наименьшее к, при котором
Таблица 8
УСЛОВИЕ
1
139
3
4
5
6
7
8
9
10
11
12
13
14
s
2 4 6
2 4 6
! ! !
s
3 5! !
s
= +
+ +
1
1
3
1
2
4
1
3
5*
* *
.
.
.
s
= + + + +1
12141
8
...
s
= + +
+
+1
111
2
1
3! !
!
..
.
s
= − + − +1
1
11315
...
s
= + +
+
1
2 3
2
3 4
3
4 5* * *
..
.
s
2 4 6
! ! !
s
n n n
= − + − +1
2 3 3 4 4 5
2 3
*
(
*
) (
*
) ...
s
=
+
+ + +2
2
223
2
4
.
..
s
= +
+ + +1
15151
5
2
3 4
...
s
= − + −
+1
12141
8
...
x x x
= − + − +1
...
3 5
x
= − + −
...
2 4 6
x x x
= − + − +1
...
Массив вводить с клавиатуры.
Тема 6. Составные типы данных.
Создание одномерных массивов и стандартных процедур.
Порядок работы
1. Разработать алгоритм и программу примеров из табл.9.
140