Подготовка
к промежуточному контролю
Под
первичной обработкой информации
будем понимать следующие операции
заполнение массивов, отыскание в нем
максимального и минимального элементов,
определение среднего арифметического
и среднего геометрического значений,
сортировку элементов массива.
Рассмотрим
некоторые примеры первичной обработки
информации, выносимые на промежуточный
контроль.
Пример.
Для заданного случайным образом
массива x (1.5<=x<=2.5), состоящего из
12 элементов, определить среднее
арифметическое для всех и среднее
геометрическое для x>2. Этапы решения
задачи сведены в таблицу
Таблица
N
|
Этапы
программирования
|
Выполнение
|
1.
|
Постановка
задачи
|
Для
заданного случайным образом массива
х (1.5<=x<=2.5), состоящего из 12
элементов, определить среднее
арифметическое для всех x и среднее
геометрическое для х>2.
|
2.
|
Математическое
описание
|
-
среднее арифметическое.
-
среднее геометрическое
|
3.
|
Разработка
структограммы
|
|
4.
|
Написание
программы
|
Program
PK1;
Var
x:array [1..12] of real;
i,n,k:integer;
A,P:real;
Begin
A:=0;
P:=1; n:=12; k:=0;
{задание
нач.
зн.}
Randomize;
{подключение генератора
случайных
чисел}
For
i:=1 to 12 do
Begin
x[i]:=random+1.5;
{генерация
x∈(1.5,2.5)}
A:=A+x[i];
{сумматор
для среднего
арифметического}
If
x[i]>2 then
Begin
P:=P*x[i];
{произведение для вычисление среднего
геометрического}
k:=k+1;
{счетчик сомножителей для вычисление
среднего геометрического}
end;
end;
A:=A/n;
{среднее
арифметическое}
P:=exp(Ln(P)/k);
{среднее
геометрическое}
Writeln(A,P);
end.
|
5.
|
Отладка
и получение результатов
|
Выполнить
самостоятельно.
|
Пример.
Для шести произвольных значений
X∈(1,3)
рассчитать и записать массив Y
Этапы
решения задачи сведены в таблицу
Таблица
N
|
Этапы
программирования
|
Выполнение
|
1.
|
Постановка
задачи
|
Для
шести произвольных значений X∈(1,3)
рассчитать и записать массив Y.
|
2.
|
Математическое
описание
|
—
|
3.
|
Разработка
структограммы
|
|
4.
|
Написание
программы
|
Program
P6;
Var
x,y:array[1..6]
of real;
I:integer;
Begin
X[1]:=1,2;X[2]:=2,5;X[3]:=2,9;{зад.
массивов}
X[4]:=1,7;X[5]:=1,5;X[6]:=2,3;
{опер. присв.}
For
i:=1 to 6 do
Begin
If
x[i]<2 then y[i]:=exp(x[i]*ln(2,5));
If
x[i]>=2 then y[i]:=sqr(sin(x[i])/cos(x[i]);
Writeln(x[i],y[i]);
End;
End.
|
5.
|
Отладка
и получение результатов
|
Выполнить
самостоятельно
|
Пример.
Самостоятельно составьте программу
для решения задачи.
Заполнить
массив из 10 элементов. Отсортировать
элементы массива в порядке возрастания.
Найти min и max значения массива. Вывести
на экран исходный, отсортированный
массивы, min и max значения.
Контрольное
задание. Лабораторная работа 1
Табулирование
функций и построение графиков
Цель
работы.
Изучение операторов цикла, ввода-вывода
информации и основ машинной графики.
Задание.
-
Для
10 произвольных значений аргумента
x рассчитать f(x), 2f(x), f(2x), f(x+1)+2, |f(|x|)| и
занести в таблицу.
Таблица
Представление
результатов расчета
-
X
|
f(x)
|
2
f(x)
|
f(2x)
|
f(x+1)+2
|
|f(|x|)|
|
|
|
|
|
|
|
|
|
|
|
|
|
-
Построить
на экране и распечатать на принтере
графики указанных функций (5 графиков).
Варианты
функций приведены в таблице.
Таблица
Варианты
функций
-
Вар.
|
f(x)
|
Вар.
|
f(x)
|
1
|
sin(x)
|
16
|
2+x
|
2
|
cos(x)
|
17
|
2-x
|
3
|
tg(x)
|
18
|
1/x2
|
4
|
ctg(x)
|
19
|
ln
(x)
|
5
|
arcсos(x)
|
20
|
lg
(x)
|
6
|
arctg(x)
|
21
|
log2(x)
|
7
|
2∙ex
|
22
|
3∙x1.5
|
8
|
|
23
|
4∙1.5x
|
9
|
1/(x+1)
|
24
|
sin(x)/x
|
10
|
1/(x2+1)
|
25
|
sin(3x)
|
11
|
(x-1)2
|
26
|
sin2(x)
|
12
|
x2-1
|
27
|
3∙cos2(x)+1
|
13
|
x3+1
|
28
|
2tg2(x)
|
14
|
|
29
|
arctg(2x)
|
15
|
1-e-x
|
30
|
|
Содержание
отчета:
-
Название,
цель работы и задание.
-
Структограмма
и распечатка программы.
-
Таблица
расчетных значений, графики функций
и выводы по работе.
|