Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Задания_25_11_ 2010.doc
Скачиваний:
2
Добавлен:
08.05.2019
Размер:
1.59 Mб
Скачать
      1. Пример решения задачи

Задание:

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

    1. Задание 2. Вложенные ветвления

Задание. Составить схему алгоритма и два варианта программы на языке Паскаль для вычисления значений функции y=f(x) при произвольных значениях x. Варианты заданий в таблице 2.2.

      1. Варианты заданий на вложенные ветвления:

Таблица 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

      1. Пример решения задачи

З адание:

При 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