8. Условный оператор в сокращенной и полной форме. Составной оператор.

Условный оператор.

Условный оператор.

Форма условного оператора (ниже дается перевод на русский язык ключевых слов).

if< логическое выражение> then <оператор1> else <оператор2>;

(если) (тогда) <оператор1> (иначе) <оператор2>;.

Если логическое выражение истинно, то выполняется оператор1, иначе выполняется оператор2 и затем следующий оператор программы. Перед словом else точку с запятой ставить нельзя!

Сокращенная форма этого оператора:

if логическое выражение then оператор1;

Если логическое выражение истинно, то выполняется оператор1, иначе выполняется следующий оператор программы.

Примеры:

Пусть а имеет значение 6.

Тогда после выполнения оператора if a>5 then d:=8.5 else d:=3;

переменная d примет значение 8.5,

а после выполнения оператора if a>7 then d:=7;

переменная d не изменит своего значения.

3.3. Составной оператор.

Если после then или else надо выполнить несколько операторов, то эти операторы заключают в операторные скобки begin ... end и получают составной оператор.

Структура составного оператора:

begin

<оператор1>;

<оператор2>;

..........

<операторn>

end;

Заметим, что перед end точка с запятой “;” может не ставится.

9. Ввод и вывод с использованием формы. Таблица функций преобразования чисел.

Ввод и вывод с использованием формы.

Вводить данные будем в компонент формы класса TEdit. В один компонент вводить можно только одну символьную строку. Если это данное имеет тип String, то после ввода преобразований не требуется. Но если данное является символьным представлением числа, то для перевода во внутреннее представление (для проведения вычислений) воспользуемся стандартной функцией StrToInt(i1) для целых чисел и стандартной функцией StrToFloat(a1) для вещественных, где i1 – символьное представление целого числа, а1 – символьное представление вещественного числа.

Пример:

i:= StrToInt(i1); a:=StrToFloat(a1);

Внимание: переменные не должны иметь ни ведущих, ни ведомых пробелов.

В результате выполнения этих операторов внутренние переменные программы i и а получат внутренние представления соответствующих чисел.

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

Преобразование целых чисел осуществляется функцией IntToStr(i), где i – внутреннее представление числа.

Преобразование вещественных чисел осуществляется функцией FloatToStrF(a,ffFixed,m,n), где a – внутреннее представление числа, ffFixed - фиксированный набор символов, m– количество позиций, отводимое под все число, включая знак и десятичную запятую, n – количество позиций, отводимое под его дробную часть.

Почему в представлении чисел в форме используется запятая? Это потому, что формат вывода в компонент класса TEdit формы ориентирован на конкретную настройку Windows. В стандартной версии Windows в качестве разделителя целой и дробной части числа используется запятая. Можно с помощью Панели Управления изменить запятую на точку. Но делать этого мы не будем, и поэтому в компоненте класса TEdit формы для вещественных чисел мы используем запятую. Разумеется, в Object Pascal разделителем между целой и дробной частью является точка.

Мы ограничимся выводом вещественных чисел только в форме с фиксированной точкой.

Для преобразования строки символов из формы во внутреннее представление ПК и обратного преобразования нам понадобятся четыре функции.

Таблица 3.3. Функции преобразования чисел.

Обращение к функции	Пояснения
IntTоStr(x)	x – внутреннее представление числа типа Integer. Результат – строка символов, представляющая это целое число.
StrToInt(a)	а – строка символов, представляющая целое число. Результат – внутреннее представление в виде числа типа Integer
FloatToStrF(x,ffFixed,m,n)	x – внутреннее представление числа типа Extended, ffFixed – набрать, что написано, m – количество позиций, занимаемых всем числом, считая знак и десятичную запятую, n – количество позиций, занимаемых дробной частью числа (m ≥ n+2). Речь идет о представлении числа в форме с фиксированной запятой. Результат – символьное представление числа с плавающей запятой.
StrToFloat(a)	a – строка символов, представляющая число в форме с фиксированной запятой, Результат – внутреннее представление числа типа Extended.