Лабораторная работа №17 изучение интегрированной среды pascal: Организация ввода-вывода
ЦЕЛЬ РАБОТЫ. Познакомиться с интегрированной средой паскаль, получить практические навыки работы с ней, закрепить сведения лекционного материала.
З А Д А Н И Е. Создайте алгоритм (в виде блок-схемы) решения задания согласно предложенному варианту, по составленному алгоритму напишите программу, используя язык Паскаль и операторы ввода-вывода.
Порядок выполнения лабораторной работы
Внимательно прочитать и уяснить условие задачи, которую предстоит решить.
Ознакомиться с необходимым теоретическим материалом лек.
Подготовить свой вариант текста программы и решить его с помощью компьютера.
Сделать отчет.
Что нужно знать для выполнения работы
1. Символы, используемые в схемах программ и правила их применения.
2. Структуру программы.
3. Оператор присваивания, математические и логические операции, их приоритет.
4. Операторы ввода-вывода read(ln), write(ln).
5. Стандартные математические функции Паскаля.
6. Условный оператор if … then…else.
7. Оператор выбора case … of…else…end.
8. Ознакомьтесь с примерами решения задач
В листинг программы должны быть включены комментарии:
Информация о задании и задании и данные об учащемся
Каждой строке программы должен соответствовать свой комментарий
При вводе информации должно быть предложено в операторе ввода её ввести
При выводе должна иметь место информация (в операторе вывода о том, что выводится)
ВНИМАНИЕ! В предложенном вам задании имеется делимое и делитель: ввиду этого не забудьте предварительно сделать проверку на равенство нулю результата вычисления делителя! Это необходимо описать в комментариях. При равенстве делителя нулю – выдавать сообщение: «Деление на 0 не возможно!» и выходить из программы.
Полный условный оператор
If логическое_выражение then оператор1
else оператор2;
Если логическое выражение имеет значение TRUE, то выполняется оператор1, иначе выполняется оператор2. Всегда выполняется только один из операторов. Перед else точка с запятой не ставится, т.к. if-then-else – единый оператор.
Пр. Вычислить m=min(x,y):
if x<y then m:=x else m:=y;
Пр. Если a и b одного знака, найти их произведение, иначе заменить нулями.
if a*b>0 then c:=a*b
else begin
a:=0; b:=0;
end;
Из примера видно, что к ветви алгоритма, состоящей более чем из одного оператора, здесь также применяются операторные скобки.
Составной условный оператор применяется, когда есть более 2 вариантов расчета.
if логическое_выражение1 then оператор1
else if логическое_выражение2 then оператор2
. . .
else if логическое_выражениеN then операторN
else оператор0;
Последовательно проверяются условия 1,2,…,N, если некоторое условие истинно, выполняется соответствующий оператор и управление передается на оператор, следующий за условным. Если все условия ложны, выполняется оператор0. Число ветвей N неограниченно, ветви else оператор0; может и не быть.
Пр. Вычислить значение функции, заданной графически:
i
f
x<-1 then y:=0
else if x<0 then y:=x+1
else if x<1 then y:=1-x
else y:=0;
или иначе:
if (x<-1) or (x>=1) then y:=0
else if (x<0) then y:=x+1
else y:=1-x;