- •Программирование на Турбо Паскале Задания к лабораторным работам Оглавление
- •Лабораторная работа № 1
- •Варианты заданий
- •Пример решения задачи
- •Задачи повышенной сложности
- •Лабораторная работа № 2
- •Задание 1. Ветвление с двумя альтернативами
- •Варианты заданий на ветвление с двумя альтернативами
- •Пример решения задачи
- •Задание 2. Вложенные ветвления
- •Варианты заданий на вложенные ветвления:
- •Пример решения задачи
- •Задание 3. Оператор выбора
- •Варианты заданий на оператор выбора
- •Пример решения задачи
- •Задачи повышенной сложности
- •Лабораторная работа № 3
- •Варианты заданий к лабораторной работе № 3
- •Пример решения задачи
- •Задания к лабораторной работе № 4
- •Варианты заданий
- •Пример решения задачи
- •Задания к лабораторной работе № 5
- •Варианты заданий
- •Пример решения задачи
- •Задания к лабораторной работе № 6
- •Варианты заданий
- •Пример решения задачи
- •Задания к лабораторной работе № 7
- •Варианты заданий к лабораторной работе №7
- •Пример решения задачи
- •Порядок выполнения работ
- •Выход из среды тр:
- •Печать отчёта:
Пример решения задачи
Задание:
1) при x= 5.00 2) при x= 1.20
Решение: 1.Блок-схема алгоритма вычислений представлена на рисунке.
Рисунок 2.1
Да
Нет
2.Текст программы.
program p2;
var a,b,x,y:real;
begin
a:=3.7;b:=6.1;
write('введите x=');
readln(x);
if x<=2 then y:=b+3*cos(x)*sqr(cos(x))
else y:=sqrt(a*sqr(x)+7*x+10);
writeln('при x=',x:5:2,' значение y=',y:5:2);
readln;
end.
3.Результат выполнения контрольного примера
при x= 5.00 значение y=11.73
при x= 1.20 значение y= 6.24
Задание 2. Вложенные ветвления
Задание. Составить схему алгоритма и два варианта программы на языке Паскаль для вычисления значений функции y=f(x) при произвольных значениях x. Варианты заданий в таблице 2.2.
Варианты заданий на вложенные ветвления:
Таблица 2.2
Номер варианта |
Y=F(x) |
Исходные данные |
1 |
|
|
2 |
|
|
3 |
|
|
4 |
|
|
5 |
|
|
6 |
|
|
7 |
|
|
8 |
|
|
9 |
|
|
10 |
|
|
11 |
|
|
12 |
|
|
13 |
|
|
14 |
|
|
15 |
|
|
16 |
|
|
17 |
|
|
18 |
|
|
19 |
|
|
20 |
|
|
21 |
|
|
22 |
|
|
23 |
|
|
24 |
|
|
25 |
|
|
26 |
|
|
27 |
|
|
28 |
|
|
29 |
|
|
30 |
|
|
Пример решения задачи
З адание:
При a=3,7 b=6,1 и значениях Х 1) Х =-1,16 2) Х= 1.32 3) Х =3.9
Решение: 1.Блок-схема программы с вложенным ветвлением.
Рисунок 2.2
Нет
Да
Нет
Да
2.Текст программы.
program p3;
var a,b,x,y:real;
begin
a:=3.7;b:=6.1;
write('введите x=');
readln(x);
if x<-1 then y:=x+2*b
else if x<=2 then y:=exp(-x)
else y:=cos(a*x);
writeln(' при x=',x:5:2,' значение y=',y:5:2);
readln;
end.
3.Результат выполнения контрольного примера
при x=-1.16 значение y=11.04
при x= 1.32 значение y= 0.27
при x= 3.90 значение y=-0.29