Лб инф передел / Pascal / Лабораторные по информатике / Лб 2.1 / Соловаров ИС-148 Отчёт оп Л.Б. 2.1 вар. 10

Российский Государственный Гидрометеорологический университет

Кафедра Морских Информационных Систем

Лабораторная работа № 2.1

Линейный вычислительный процесс.

Программирование формул.

Вариант № 10

Выполнила студент группы ИС-148

Соловаров Р.А.

Работу принял доцент кафедры МИС

Неклюдова С.А.

Санкт-Петербург

2012

1.Задание

По введенным с клавиатуры значениям x,k вычислить Y=f(x)

2.Формализация

3.Таблица имен

Имя в задаче	Имя в программе	Тип Данного	Содерж. Смысл
K	K	Исх. переменная	2 или 3 4 или 5 K<5 или K>3
X	X	Исх. переменная	2
Y	Y	Расч. переменная

4.Таблица трассировки

№	№ блока	Результат вычислений
1	1	Ввод x=2, k=3
2	2	K=2 x=3 y=11.00 true
3	3	Y== 11.00
4	9	Вывод y=11.00
5	10	Конец.
6	1	Ввод x=4, k=5
7	2	K=4 x=5 y=0.20 false
8	4	K=4 x=5 y=0.20 true
9	5
10	9	Вывод y=
11	10	Конец.

5.Блок схема

6.Код программы

PROGRAM P1;

VAR x,Y,k: REAL;

BEGIN Writeln('Введите через пробел x и k'); READLN(x,k);

IF (k=2) or (K=3)

Then Y:=(EXP(k*ln(x)))+x+1;

IF (k=4) or (k=5)

Then Y:=(1/ABS(x+1));

IF (k>5) or (k<3)

Then Y:=SQRT(SQRT(ABS(x+k))+SQRT(ABS(x-1)));

Writeln('Y=', Y:6:2);

END.

7.Вывод

Так как результат трассировки совпадает с результатом выполнения программы, алгоритм разработан, верно.