Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Методичка_Ефименко.doc
Скачиваний:
15
Добавлен:
06.11.2018
Размер:
1.4 Mб
Скачать

Варианты заданий.

п/п

Модель

Исходные данные

Выводимые

данные

1

2

3

4

1

0 x ≤ 10

hx=1

Z, x.

Количество Z [-1;1].

Сумма Z  [-1;1].

2

x=0.8

a

y, N, a, x

3

-2 x ≤ 2

hx=0.2

x, y. Среднеарифметическое положительных значений у.

4

3 x ≤ 5

hx=0.1

F, x. Сумма, количество положительных значений F.

5

F=N!

-2≤ x ≤ 2

hx=1

x, N, F

6

a,b

0 x ≤ 2

hx=0.2

y, x, N, k.

F,

где N – к-во у>0,

k – к-во у≤0.

Продолжение таблицы к заданию 2

1

2

3

4

7

hx=

x, , y.

Произведение (Р).

y [0;5]

8

x

x, y, S

9

y=t-x+5

-5 ≤ x ≤ 5

hx=1

x, t, y.

Количество y>t.

10

t

x, z, t

11

a

a, Q

12

y=sin2x+0.5cosx2

0 x ≤ 2

hx=0.1

Z, y, x, R.

Количество слагаемых в R.

13

1 i ≤ 10

hx=1

i, y, Z, S.

Количество y>0

Продолжение таблицы к заданию 2

1

2

3

4

14

q=0.5sinx

0 x ≤ 2

hx=0.2

x, q, P, S, A.

Количество p<0.

15

a,b

x, y, S, P.

16

a,b,c,d

0.1 x ≤ 1

hx=0.1

x, y, z.

Сумма вычисленных z.

17

- 1 x ≤ 5

hx=0.2

y, F, x, Z.

Количество y>Z.

18

Определить действительные корни уравнения

a,c

-4 b ≤ 5

hb=1

b и соответствующие действительные корни уравнения.

19

b

0 x ≤ 5

hx=0.5

x, y, f

количество f>0 и f<0

20

Z=Ln(i)

1 ≤ i ≤ 10

hi = 1

i, y, Z. Произведение и количество положительных у.

Задание № 3. Организация циклов с неизвестным числом повторений

Задание. Составить блок-схему алгоритма и программу решения поставленной задачи, которая в соответствии с исходными данными вычисляет значения заданных выражений.

Пример. Составить алгоритм и программу для вычисления y, при всех значениях x, начинающихся с начального xn > 0, и изменяющихся с шагом 0.6. Вычислять y, пока подкоренное выражение ≥0.1. Найти количество вычисленных y.

Б лок-схема алгоритма:

Программа на языке Турбо Паскаль:

Program Pr3;

Var x, xn, hx, y: real; k : integer;

Begin

Write(‘Ввод xn, hx ’); Readln(xn, hx);

x:=xn; k := 0;

While Exp(-0.4 * x) >= 0.1 do Begin

y := cos(x / Pi ) * Sqrt(Exp(-0.4 * x));

writeln(‘x=’, x : 6 : 2, ‘ y=’, y : 6 : 2);

k := k + 1; x := x + hx; End;

writeln(‘k=’, k); End.