close

Вход

Забыли?

вход по аккаунту

?

Лаба по АП 3

код для вставкиСкачать
Министерство образования и науки Украины
Национальный горный университет
отчет
Лабораторная работа №3
Разгалужений вычислительный процесс
Кусковые функции
Выполнил:
студент группы Книт-10-1
Новицкий А.В.
Проверил:
Качанов А.В. /_____________/
оценка: ______________
дата: "___"___________
г. Днепропетровск
2010
1)Условие задачи:
2)Блок-схема:
1) Листинг (или рукопись) программы:
program Project1;
uses
SysUtils;
var x : real;
begin
writeln ('vvedite znachenie X');
read(X); // вводим значение х
if (X<=0) then write(-100) // задаем условие вывода, если условие правильно выводи содержимое в скобках
// если ложное переходим к следующей строке
else if (0<X)and(X<=1)then write(1/sqr(X))// если условие ложное, то переходим к проверки другого условия
// и если это условие правильное выводим содержимое в скобках
else if (X>1)and(X<=4)then write(X) // если условие ложное, то переходим к проверки другого условия
// и если это условие правильное выводим содержимое в скобках
else if (X>4) then write(100+ln(x));// если условие ложное, то переходим к проверки другого условия
// и если это условие правильное выводим содержимое в скобках
readln;
readln;
end.
2) Результаты вычисления программы:
Рис1: X<=0
Рис2: 0<X<=1
Рис3: 1<X<=4
Рис4: X>4
4)Выводы: В процессе выполнения работы, научился пользоваться оператором If, а также строить блок-схемы с помощью оператора If. 
Документ
Категория
Рефераты
Просмотров
4
Размер файла
97 Кб
Теги
лаба
1/--страниц
Пожаловаться на содержимое документа