Лаб №3 (Информатика)
.pdf
11
Все переменные (кроме той, в которой будет храниться результат вычисления выражения) должны быть типа integer. Для хранения
результата вычисления выражения использовать переменную типа real.
Значения всех переменных (кроме той, в которой будет храниться результат) должны быть установлены при их объявлении в разделе const.
Переменная, в которой будет храниться результат, должна быть объявлена в
разделе var.
Указатель формата вывода результата должен отсутствовать.
Пример выполнения задания №1:
На рис. 1 представлен пример выполнения данного задания в системе
Турбо-Паскаль для выражения sin(a1 a2 ) ln(b1 b2 ) .
Рис. 1. Текст программы для примера выполнения задания №1
Рассмотрим особенности данной программы.
В программе 14 строк, каждая из них помечена комментарием с номером. При выполнении данного задания, Вам эти комментарии можно не указывать. В данном примере они нужны только для того, чтобы удобнее объяснить особенности программы.
Переменным, входящим в состав выражения, записанного в математической форме ( a1 , a2 ,b1 ,b2 ), соответствуют переменные, записанные по правилам синтаксиса языка Паскаль: a1, a2, b1, b2. Данные переменные объявлены в разделе const (строки 1-4 программы).
12
Переменная, в которой будет храниться результат вычисления выражения, была названа rez и объявлена в разделе описания переменных var (строка 5 программы).
Исполняемые операторы программы располагаются между служебными словами begin (строка 6) и end (строка 14), которые предназначены для объединения операторов.
В строках 7-10, с помощью стандартной процедуры writeln, на экран, в качестве подсказки пользователю (чтобы напомнить исходные данные для вычисления выражения), выводятся значения переменных a1, a2, b1, b2 соответственно.
В строке 11 выполняется вычисление выражения и присваивание его значения переменной rez.
Для вывода результатов вычисления выражения в строке 12
используется стандартная процедура writeln. В скобках через запятую перечисляется все, что мы хотим вывести на экран, т.е. пояснительный текст, заключенный в апострофы, и непосредственно сам результат вычисления выражения.
Встроке 13 с помощью стандартной процедуры readln
пользователю предлагается завершить выполнение программы, нажав клавишу «Enter».
Результат выполнения программы представлен на рис. 2.
Рис. 2. Результат выполнения программы для задания №1
Завершаем выполнение программы, нажав клавишу «Enter».
Задание №2. Написать в системе Турбо-Паскаль программу для вычисления значения выражения (по вариантам):
13
1)x 1 2 18xy2 ;
x 1
2) |
|
1 |
|
|
2 |
y ; |
|||
1 |
|
|
12x |
|
|||||
x2 |
|
||||||||
|
|
|
|
|
|
||||
3) |
|
x2 |
7x 10 |
; |
|
|
|||
|
x2 |
|
|
|
|
||||
|
|
8x 12 |
|
|
|||||
4) |
|
cos x |
16x cos xy 2 ; |
||||||
|
|
|
|
|
|||||
x2x
5)2 x cos x sin 2xy ;
6) |
2ctg 3x |
|
|
1 |
|
; |
|||||||
12x2 |
7x 5 |
||||||||||||
|
|
|
|
|
|
|
|||||||
7) |
|
x2 x3 |
|
|
|
|
7x |
|
|
|
; |
|
|
|
|
|
|
||||||||||
|
|
|
|
|
|
|
|
|
|||||
|
|
|
|
|
|
|
x3 15x |
|
|||||
|
|
|
|
|
|
|
|
||||||
8) |
|
x ln x |
|
|
y |
|
|
; |
|
||||
|
cos x |
x |
|
||||||||||
|
|
|
|
|
3 |
|
|
|
|
||||
|
|
|
|
|
|
|
|
|
|
|
|
||
9) sin 
x 1 sin 
x 1 .
Все переменные должны быть типа real.
Значения всех переменных должны быть установлены с использованием оператора присваивания.
Использовать формат вывода R:P. Значение P подобрать на свое усмотрение.
Пример выполнения задания №2:
На рис. 3 представлен пример выполнения данного задания в системе
Турбо-Паскаль для выражения ( |
x |
5)2 |
1 |
y |
. |
|
|
||||
|
y |
|
x |
||
Рис. 3. Текст программы для примера выполнения задания №2
Рассмотрим особенности данной программы.
14
В отличие от программы из предыдущего задания, и переменные,
входящие в состав выражения (x, y), и переменная, в которой будет храниться результат вычисления выражения (rez), объявлены в разделе описания переменных var (строка 1 программы).
Исполняемые операторы программы располагаются между служебными словами begin (строка 2) и end (строка 10).
В строках 3 и 5 расположены операторы присваивания, с помощью которых для переменных x и y устанавливаются значения 69 и 5
соответственно.
Встроках 4-6, с помощью стандартной процедуры writeln, на экран,
вкачестве подсказки пользователю, выводятся значения переменных x и y
соответственно.
В строке 7 выполняется вычисление выражения и присваивание его значения переменной rez.
Для вывода результата вычисления выражения в строке 8
используется стандартная процедура writeln с использованием соответствующего формата вывода.
В строке 9 с помощью стандартной процедуры readln пользователю предлагается завершить выполнение программы, нажав клавишу «Enter».
Результат выполнения программы представлен на рис. 4.
Рис. 4. Результат выполнения программы для задания №2
Завершаем выполнение программы, нажав клавишу «Enter».
Задание №3. Написать в системе Турбо-Паскаль программу для вычисления значения выражения (по вариантам):
1) e2 y2 12xy 3x3 ;
18y 1
2) 1 sin 
x 1 ; cos 12y 4
15
3) |
2ctg 3x |
ln cos x |
; |
ln 1 x2 |
4)ex x 2 1 x x ;
5)3x 4x y 
x ;
6)x 10sin x x4 x5 ;
7)x 10sin x cos x y ;
8) |
|
1 sin 2 x y |
|
|
x ; |
|||||||
|
2 |
|
x |
|
|
2x |
|
|
||||
|
|
|
|
|
||||||||
|
|
|
|
|
|
|
|
|||||
|
|
|
|
|
|
|
|
|
||||
|
|
|
|
|
|
1 x2 y2 |
|
|
|
|||
|
|
|
2 |
|
1 |
|
|
|
||||
9) |
cos |
|
|
|
sin |
|
. |
|
|
|
||
|
|
|
|
|
|
|
||||||
|
|
|
|
|
|
|
x |
|
|
|
||
Все переменные должны быть типа real.
Значения всех переменных должны быть введены пользователем.
Использовать формат вывода R:P:Q. Значения P и Q подобрать на свое усмотрение.
Пример выполнения задания №3:
На рис. 5 представлен пример выполнения данного задания в системе
Турбо-Паскаль для выражения tg(2x) cos(7z 5) .
3y
Рис. 5. Текст программы для примера выполнения задания №3
Рассмотрим особенности данной программы.
Все переменные, входящие в состав выражения (x, y, z), и
переменная, в которой будет храниться результат вычисления выражения
(rez), а также дополнительная переменная w, объявлены в разделе описания переменных var (строка 1 программы).
16
Исполняемые операторы программы располагаются между служебными словами begin (строка 2) и end (строка 13).
В строках 3, 5 и 7 с помощью процедуры write выводится подсказка пользователю о том, что необходимо ввести значения переменных x, y, z
соответственно.
В строках 4, 6, 8 с помощью процедуры readln пользователю предлагается ввести значения переменных x, y, z соответственно. После ввода значения каждой из переменных необходимо нажать клавишу «Enter».
Вспомогательная переменная w используется для того, чтобы упростить программисту написание выражения на языке Паскаль, не
записывая дважды 2x . В строке 9 данной переменной присваивается
3y
значение выражения 2x . Напомним, что стандартная функция вычисления
3y
тангенса в языке Паскаль отсутствует, поэтому значение данной функции вычисляется с помощью стандартных функций sin и cos.
В строке 10 выполняется вычисление выражения и присваивание его значения переменной rez.
Для вывода результата вычисления выражения в строке 11
используется стандартная процедура writeln с использованием соответствующего формата вывода.
Встроке 12 с помощью стандартной процедуры readln
пользователю предлагается завершить выполнение программы, нажав
клавишу «Enter».
Рассмотрим особенности выполнения программы.
Изначально пользователю предлагается ввести значение переменной x
(рис. 6).
Рис. 6. Пользователю необходимо ввести значение переменной x
17
Вводим значение переменной x, равное, например, 70, и нажимаем клавишу «Enter» (рис. 7). На экране выводится очередная подсказка о том,
что нужно ввести значение следующей переменной, т.е. переменной y.
Рис. 7. Пользователю необходимо ввести значение переменной y
Вводим значение переменной y, равное 13, и нажимаем клавишу
«Enter» (рис. 8). На экране выводится подсказка о том, что необходимо ввести значение переменной z.
Рис. 8. Пользователю необходимо ввести значение переменной z
Вводим значение переменной z, равное -2.55, и нажимаем клавишу
«Enter» (рис. 9). На экране выводится результат вычисления выражения.
Рис. 9. На экране вывелся результат вычисления выражения
Завершаем выполнение программы, нажав клавишу «Enter».
Задание №4. Написать в системе Турбо-Паскаль программу для
решения задачи (по вариантам):
1)Вычислить периметр и площадь прямоугольного треугольника по длинам двух катетов a и b.
2)Заданы координаты трех вершин треугольника: (x1, y1), (x2, y2) и (x3,
y3). Найти его периметр и площадь.
3)Вычислить длину окружности и площадь круга одного и того же заданного радиуса R.
4)Три сопротивления R1, R2 и R3 соединены параллельно. Найдите сопротивление соединения.
5)Составить программу вычисления объема цилиндра и конуса,
которые имеют одинаковую высоту H и одинаковый радиус основания R.
18
6) Составить программу для вычисления пути, пройденного лодкой,
если ее скорость в стоячей воде v км/ч, скорость течения реки v1 км/ч, время движения по озеру t1 ч, а против течения реки – t2 ч.
7) Составить программу перевода радианной меры угла в градусы,
минуты и секунды.
8)Найти произведение цифр заданного четырехзначного числа.
9)Даны два числа. Найти среднее арифметическое кубов этих чисел и среднее геометрическое модулей этих чисел.
10)Написать программу, которая выводит на экран первые четыре степени числа .
11)Дана длина ребра куба. Найти площадь грани, площадь полной поверхности и объем этого куба.
12)Треугольник задан величинами своих углов и радиусом описанной
окружности. Найти стороны треугольника.
Исходные данные для решения задачи должны вводиться пользователем. Тип переменных подобрать самостоятельно в зависимости от задачи.
Примеры выполнения задания №4:
Пример №1. Постановка задачи. Найти площадь треугольника, две стороны которого равны a и b, а угол между этими сторонами равен (в
градусах).
Решение. Из геометрии известно, что площадь треугольника можно
найти по формуле: S 1 absin .
2
На рис. 10 представлен пример выполнения данного задания в системе Турбо-Паскаль.
19
Рис. 10. Текст программы для нахождения площади треугольника
Рассмотрим особенности данной программы.
Все переменные, входящие в состав выражения для вычисления площади треугольника (a, b, gamma), и переменная, в которой будет храниться результат вычисления площади (s), объявлены в разделе описания переменных var (строки 1-2). Переменная gamma соответствует углу .
Исполняемые операторы программы располагаются между служебными словами begin (строка 3) и end (строка 13).
Спомощью процедуры write, выводится подсказка пользователю о том, что необходимо ввести значения переменных a, b и gamma (строки 4, 6, 8 соответственно).
Спомощью процедуры readln пользователю предлагается ввести значения переменных a, b и gamma (строки 5, 7, 9 соответственно). После ввода значения каждой из переменных необходимо нажать клавишу «Enter».
В строке 10 выполняется вычисление площади треугольника и присваивание ее значения переменной s. Следует обратить внимание, что стандартная функция sin в языке Турбо-Паскаль в качестве аргумента использует выражение, измеряемое в радианах. Т.к. пользователь вводит значение угла в градусах, то при вычислении синуса необходимо производить перевод из градусов в радианы по формуле:
1 градус = /180 радиан.
20
Для вывода результата вычисления выражения в строке 11
используется стандартная процедура writeln с использованием
соответствующего формата вывода.
Встроке 12 с помощью стандартной процедуры readln
пользователю предлагается завершить выполнение программы, нажав
клавишу «Enter».
Рассмотрим особенности выполнения программы.
Изначально пользователю предлагается ввести значение переменной
a, т.е. длину стороны a (рис. 11).
Рис. 11. Пользователю необходимо ввести значение переменной a
Вводим значение переменной a, равное, например, 6, и нажимаем клавишу «Enter» (рис. 12). На экране выводится очередная подсказка о том,
что нужно ввести значение переменной b, т.е. длину стороны b.
Рис. 12. Пользователю необходимо ввести значение переменной b
Вводим значение переменной b, равное 7.5, и нажимаем клавишу
«Enter» (рис. 13). На экране выводится подсказка о том, что необходимо ввести значение переменной gamma, т.е. угла .
Рис. 13. Пользователю необходимо ввести значение переменной gamma
Вводим значение переменной gamma, равное 35, и нажимаем клавишу
«Enter» (рис. 14). На экране выводится вычисленная площадь треугольника.
Рис. 14. На экране вывелся результат вычисления площади
Завершаем выполнение программы, нажав клавишу «Enter».
Пример №2. Постановка задачи. Найти сумму цифр заданного трехзначного числа.
