Задача №1

Составить схему алгоритма и программу на языке Паскаль для расчета значений функций при заданном значении аргументов:

(Вариант задания выбрать по последней цифре шифра)

Вариант задания	Функция	Условие	Исходные данные
1.
2.
3.
4.
5.
6.
7.
8.			-
9.
10.

Пример выполнения задачи №1 на языке Бейсик

Вычислить на ЭВМ значение функции

Схема алгоритма представлена на рис.1 Блоки 4 и 6 выполняют проверку условия - равно или больше единицы. Блоки 3, 5, 7 вычисляют значение функции. Блок 8 выводит результаты на печать. Программа представлена ниже.

10 LPRINT, “КОНТРОЛЬНАЯ РАБОТА №1, ВАР.2”

20 LPRINT, “СТУДЕНТА ИВАНОВА П., ШИФР 807192”

30 INPUT “ВВЕДИТЕ ЗНАЧЕНИЯ A, B, T”; A, B, T

35 LPRINT “A=”, “B=”,“T=”

40 S=A*T+B

50 IF A*T=1 THEN S=COS(A*T)

60 IF A*T>1 THEN S=EXP(-A*T)*COS(A*T)

7 0 LPRINT “РЕЗУЛЬТАТ S=”; S

80 LPRINT

90 END

КОНТРОЛЬНАЯ РАБОТА №1, ВАР.2

СТУДЕНТА ИВАНОВА П., ШИФР 807192

А=1.3 В=1.29 Т=0.5

Результат S=1.95

КОНТРОЛЬНАЯ РАБОТА №1, ВАР.2

СТУДЕНТА ИВАНОВА П., ШИФР 895192

А=1.3 В=1.29 Т=0.76

Результат S=0.5403

КОНТРОЛЬНАЯ РАБОТА №1, ВАР.2

СТУДЕНТА ИВАНОВА П., ШИФР 895192

А=1.3 В=1.29 Т=1

Результат S=0.0729

Отладку программы производить, пользуясь оператором PRINT. Только после того, как программа отлажена, добавить букву “L”: LPRINT и включить принтер.

Пример выполнения задачи №1 на зыке паскаль

Вычислить значения функции для поставленной задачи с помощью условного оператора IF – THEN. Функция S(t) содержит две постоянные (a =1.3 и b=1.29) и имеет три ветви для различных значений параметра at:

ПРОГРАММА

PROGRAM ZAD1_VAR2; USES CRT;

CONST A=1.3; B=1.29;

VAR T,S,Z : REAL;

BEGIN CLRSCR;

WRITELN (' Kontrol. rabota 1, variant 2’);

WRITELN (' Petrov P., шифр 807132');

WRITELN (' A=',A:3:1,’ B=’,B:4:1);

WRITE (' Vvedite T='); readln(t);

Z:=A*T;

IF T<1 THEN S:=Z+B ELSE

IF (T>=1) AND (T<2) THEN S:=COS(Z)

ELSE S:=EXP(-Z)*COS(B*T);

WRITELN (' T=', T:5:3,' S=',S:6:3);

WRITELN (' ----------------------');

READLN END.

РЕЗУЛЬТАТЫ

=============

Kontrol. rabota 1, variant 2

Petrov P., SHIFR 807132

A=1.3 B=1.29

T=0.5 S= 1.940

----------------------------

A=1.3 B=1.29

T=1 S= 0.267

----------------------------

A=1.3 B=1.29

T=2 S=-0.063

----------------------------