Язык программирования паскаль
PROGRAM <название программы>;
VAR <описание переменных>;
BEGI
READLN (ввод данных) ;
ОПЕРАТОР 1 ;
ОПЕРАТОР 2 ;
ОПЕРАТОР 3 ;
ОПЕРАТОР n ;
WRITELN (вывод результата) ;
END.
Пример:
Найти гипотенузу и площадь прямоугольного треугольника, если известны катеты. ( Значения катетов вводятся с клавиатуры.)
PROGRAM poisk gipotenuzi I ploschadi;
VAR katet_1, katet_2, gipotenuza, ploschad : REAL;
BEGIN
WRITELN (‘введите значение катетов’);
READLN (katet_1, katet_2);
gipotenuza := sqrt ( sqr ( katet_1) + sqr ( katet_2));
ploschad := ( katet_1 * katet_2) / 2;
WRITELN (‘гипотенуза равна’,gipotenuza:5:2, ’площадь треугольника равна’ ,ploschad:5:2);
END.
Условные алгоритмические конструкции Оператор «ветвление»
В алгоритмическую структуру «ветвление» в отличие от линейного алгоритма входит условие. В зависимости от выполнения или не выполнения, которого реализуется та или иная последовательность команд (операторов). Условием называется высказывание, которое может быть либо истинным, либо ложным.
Условие, записанное на формальном языке – называется логическим выражением. Логические выражения могут быть простыми и сложными. Сложное – это объединение простых условий по средствам логических операций (и, или, не).
Под ветвлением подразумевается ситуация, когда на основании проверки некоторых условий в программе реализуется один из нескольких заранее предопределённых путей решения задачи.
Синтаксис оператора.
IF <условие> THEN <оператор1> ELSE <оператор2>;
IF (иф) – если
THEN (зэн) – то
ELSE (эльзе) – иначе
После THEN и ELSE – стоять может только один оператор, (любой оператор ПАСКАЛЯ).
Перед ELSE точку с запятой ставить запрещено.
Под условием будем понимать арифметические выражения, соединённые знаком сравнения или несколько выражений сравнения, соединенных знаками логических операций AND (и), OR (или), NOT (не). Условия, к которым применяются логические операции, заключаются в круглые скобки, пример: IF (a>b) and (a<c).
Если условие справедливо, то результатом будет логическая величина «истина» и выполнение программы продолжается по ветви «да» (по пути THEN (то)), в противном случае логическое выражение примет значение «ложь» и выполнение программы пойдёт по ветви «нет» (по пути ELSE (иначе)).
Блок схема
ЯЗЫК ПРОГРАММИРОВАНИЯ
Паскаль
PROGRAM <название программы>;
VAR <описание переменных>;
BEGIN
IF <условие>
THEN <оператор 1>
ELSE <оператор 2>;
END.
Пример:
Найти большее из двух чисел. (Числа вводятся с клавиатуры).
PROGRAM bolschee iz dvug;
VAR a,b : REAL;
BEGIN
WRITELN (‘ведите 2 числа’) ; {пояснительная надпись}
READLN (a,b) ;
IF a>b {определение большего числа
THEN WRITELN(a) и вывод результата на экран}
ELSE WRITELN(b);
READLN; {установка паузы для просмотра результата}
END.