Задача №2
Составить схему алгоритма и программу на языке Паскаль для расчета и печати таблицы значений Y при заданном значении A: A=1,1
(Вариант задания выбрать по предпоследней цифре шифра)
Вариант задания |
Функция |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Задача №3
Для своего варианта задачи №2 составить схему алгоритма и программу типа «цикл в цикле» для расчета и печати двух таблиц значений указанной функции при A=1,1 и А=1,6.
(Вариант задания выбрать по Предпоследней цифре шифра)
Пример выполнения работы задачи на языке Бейсик.
Условие:
5 CLS
10 LPRINT, “КОНТРОЛЬНАЯ РАБОТА №2, ВАРИАНТ 4”
20 LPRINT, “СТУДЕНТА ИВАНОВА П., ШИФР 707184”
30 REM Вложенные циклы
40 LPRINT
50 FOR A=1.1 TO 1.61 STEP .5
60 LPRINT“ A= ”; A
70 LPRINT“-------------------”
80 LPRINT“ X Y(X) ”
90 LPRINT“-------------------”
100 FOR X=0 TO 2.5 STEP .5
110 Z=A*X
120 Y=(Z+SIN(Z))/(1+LOG(1+Z))
130 LPRINT USING “ ##.## ###.####”; X,Y
140 NEXT X: LPRINT: NEXT A
150 END.
КОНТРОЛЬНАЯ РАБОТА №2, ВАРИАНТ4
СТУДЕНТА ИВАНОВА П., ШИФР 707184
A=1.1
---------------------------------
X Y(X)
---------------------------------
0.00 0.0000
0.50 0.7458
1.00 1.1431
1.50 1.3405
2.00 1.3908
2.50 1.3488
A=1.6
---------------------------------
X Y(X)
---------------------------------
0.00 0.0000
0.50 0.9556
1.00 1.3294
1.50 1.3830
2.00 1.2902
2.50 1.2429
ПРИМЕР ВЫПОЛНЕНИЯ ЗАДАЧИ №3
НА ЗЫКЕ ПАСКАЛЬ
Задание. Для своего варианта задачи №2 составить схему алгоритма и программу типа «цикл в цикле» на языке Паскаль для расчета и печати двух таблиц значений указанной функции при А=1,1 и А=1,6.
Пояснение: Первой таблице соответствует значение парамера А=1,1, для второй таблицы А=1,6. Отличие задачи 3 от задачи 2 состоит в появлении второй таблицы, для чего требуется ввести цикл по переменной А.
В данном случае пример соответствует варианту №6 с измененным условием. Функция Y имеет вид
y=(2+ a2sin2(ax))/(1+(ax)2)
при переменной Х, изменяющейся в пределах 0.2, 0.4, 0.8, 1.6,3.2,…, 51.2. Таким образом, последующее значение Х в два раза больше предыдущего (геометрическая прогрессия). Разность или шаг между двумя соседними Х также возрастает в два раза. Здесь удобно применить цикл с оператором WHILE (пока). После расчета и печати значения Y(x) необходимо в теле цикла удвоить значение Х с помощью команды X:=X•2.
ПРОГРАММА
==============
PROGRAM ZAD3_VAR6; USES CRT;
VAR A,X,Y,Z : REAL;
BEGIN CLRSCR;
WRITELN (' Kontrolnaia rabota 2, zadacha 3, variant 6');
WRITELN (' Petrov А., shifr 807162');
WRITELN;
A:=1.1;
WHILE A<1.61 DO Begin
WRITELN (' A=',A:3:1 );
WRITELN ('============= 0
WRITELN (' X Y(X) ');
WRITELN ('----------------------------');
X:=0.2;
WHILE X<51.21 DO Begin
Z:=A*X; Y:=(2+SQR(A*SIN(Z)))/(1+Z*Z);
WRITELN (' ', X:5:1,' ',Y:6:5);
X:=X*2 End;
A:=A+0.5 End;
WRITELN ;
READKEY
END.
РЕЗУЛЬТАТЫ РАБОТЫ ПРОГРАММЫ
===============================
Kontrolnaia rabota 2, zadacha 3, variant 6
Petrov А., shifr 807162
A=1.1
============
X Y(X)
---------------------
0.2 1.96263
0.4 1.85952
0.8 1.53223
1.6 0.77294
3.2 0.16169
6.4 0.05084
12.8 0.01609
25.6 0.00254
51.2 0.00065
A=1.6
============
X Y(X)
---------------------
0.2 2.04401
0.4 2.06655
0.8 1.64856
1.6 0.36705
3.2 0.15278
6.4 0.03171
12.8 0.01082
25.6 0.00121
51.2 0.00032
Схема алгоритма к задаче 3
