Оператор выбора (case)

Предназначен для ветвления программ на 2 или несколько направлений.

Case <ключ выбора> of <список выбора> else P end;

<ключ выбора> - идентификатор целого или символьного типа,

<список выбора> - включает в себя две или более конструкций следующего вида:

<константа выбора>: <оператор>;

<константа выбора> - это идентификатор того же типа, что и <ключ выбора>.

Пример. Для 100 целых значений x рассчитать значение .

Составить два варианта программ: с помощью условного оператора if и c помощью оператора выбора Case.

Технологические операции программирования приведены в таблице

Таблица

N	Технологическая операция	Выполнение
1.	Постановка задачи	Для 100 целых значений x рассчитать значение y,
2.	Математическое описание	Для определения четности воспользуемся оператором mod – остаток целочисленного деления: Если x mod 2=0, то x-четное Если x mod 2=1, то x-нечетное
3.	Разработка структограммы
4.	Написание программы
4.1	С помощью оператора If	Program P4; Var x,y:integer; Begin For x:=1 to 100 do Begin If x mod 2 =0 then y:=2*x else y:=2+x; Writeln(x,y); End; End.
4.2	С помощью оператора Case	Program P4; Var x,y:integer; Begin For x:=1 to 100 do Begin Case x mod 2 of 0: y:=2*x; 1: y:=2+x; end; Writeln(x,y); End; End.
5.	Отладка и получение результатов	Выполнить самостоятельно

ФУНКЦИЯ И ПРОЦЕДУРА

Функции и процедуры представляют собой важный инструмент Турбо Паскаля, позволяющий писать хорошо структурированные программы.

Функции и процедуры должны быть описаны в разделе описания, обращение к ним производится, как правило, из тела основной программы.

Описание функций и процедур включает заголовок и основную часть описания.

1. Заголовок:

Function F1(<С.Ф.П.>): тип; {для функций},

Procedure Pr(<С.Ф.П.>); {для процедур},

где Function, Procedure – служебные слова, показывающие, что далее следует описание функции и процедуры соответственно,

F1 и Pr – имена функции и процедуры, которые записываются как идентификаторы ТП, <С.Ф.П.> - список формальных параметров.

Входные параметры от выходных при описании процедуры разделяются служебным словом var. Выходным параметром у функции является имя функции.

1. Основная часть описания функции и процедуры полностью повторяет структуру программы (см. лекцию 3).
2. Обращение к функциям и процедурам выполняется, как правило, в теле основной программы. Порядок описания функций и процедур и обращения к ним рассмотрим на примере.

Пример. Написать программу вычисления площади круга с помощью функции и процедуры.

Технология разработки программы приведена в таблице.

Таблица

N	Этап программирования	Выполнение
	Постановка задачи	Написать программу вычисления площади круга с помощью функции и процедуры
	Математическое описание	Формула для площади круга S=π∙R2
	Разработка структограммы
3.1	С использованием функции
3.2	С использованием процедуры
4.	Написание программы
4.1	С использованием функции	Program PY; Var R,S:real; Function PL(R:real):real;{Описание функции } Begin PL:=p*sqr(R); End; Begin R:=3; S:=PL(R); {Обращение к функции} Writeln(R,S); End.
4.2	С использованием процедуры	Program PY; Var R,S:real; Procedure PL(R:real;var S:real); {Описание процедуры } Begin S:=p*sqr(R); End; Begin R:=3; PL(R,S); {Обращение к процедуре} Writeln(R,S); End.
5.	Отладка и получение результатов	Выполнить самостоятельно

Для использования графических возможностей Турбо Паскаля необходимо в блоке описания uses подключить графический модуль Graph. Модуль содержит набор графических функций и процедур, основные из которых рассмотрены ниже.