Задание. Тема работы: Разработка простейшего приложения

Лабораторная работа.

Тема работы: Разработка простейшего приложения. Разработка приложения с разветвленным алгоритмом функционирования.

Цель работы: Приобретение практических навыков разработки приложений с разветвляющимися алгоритмическими структурами.

Задание к работе:

1) изучить теоретический материал в лабораторной работе;

2) получить вариант индивидуального задания;

3) разработать алгоритм решения задачи;

4) написать и отладить программу;

5) подготовить ответы на контрольные вопросы.

Содержание отчета:

1) постановка задачи индивидуального задания;

2) программа (текст рабочего модуля);

3) результаты работы программы;

4) выводы о проделанной работе.

ТЕОРЕТИЧЕСКАЯ СПРАВКА

Условный оператор «IF»

Условный оператор позволяет проверить некоторое условие и в зависимости от результатов проверки выполнить то или иное действие. Таким образом условный оператор – это средство ветвления вычислительного процесса.

Структура условного оператора имеет следующий вид:

if <условие> then <оператор1> else <оператор2>;

Пример:

Var

x, y, max: Integer;

Begin

...

if x > max then

Y:= max;

Else

Y:= x;

...

end;

Оператор выбора «CASE»

Оператор выбора позволяет выбрать одно из нескольких возможных продолжений программы. Параметром, по которому осуществляется выбор, служит ключ выбора – выражение любого порядкового типа (Integer, Char, логический тип и другие).

Структура оператора выбора имеет следующий вид:

case <ключ_выбора> of <список_выбора>[ else <операторы>] end;

Пример:

Var

ch: Char;

Begin

…..

case ch of

‘n’, ‘N’,’н’,’Н’: Label1.Caption:= ‘Нет’;

‘y’, ‘Y’,’д’,’Д’: Label1.Caption:= ‘Да’;

End

end;