Карточка-задание по программированию

Комбинация алгоритмических структур. Ветвление. Разветвляющимся называется такой алгоритм, содержащий условие. Признаком разветвляющегося алгоритма является наличие операций проверки условия. Различают два вида условий - простые и составные. Простым условием называется выражение, составленное из двух арифметических выражений, связанных одним из знаков: 1) <  (меньше, чем ...) 2) > (больше, чем... ) 3) <=  (меньше, чем... или равно) 4) >=  ( больше, чем... или равно) 5) <> (не равно) 6) =    (равно) В общем случае полная форма конструкции условного оператора имеет вид: IF условие THEN оператор1 ELSE оператор 2; Правило работы: 1. Проверяется условие. 2. Если условие истинно, то выполняется оператор1 3. Если условие ложно, то выполняется оператор2. Пример №1 (выполните программу в PascalABC и представьте изображение программы): "Вывести на экран большее из двух данных чисел". Program P1; Var x, y : integer; Begin writeln('Введите 2 числа '); readln(x,y); if x>y then writeln (x) else writeln (y); End. Пример №2 (выполните самостоятельно в PascalABC и представьте изображение программы): "Вывести на экран наименьшее из двух данных чисел". Пример №3 (выполните самостоятельно в PascalABC и представьте изображение программы): "Проверить, могут ли три данных целых числа быть углами треугольника". Сложное условие – это условие, состоящее из нескольких простых условий, связанных с помощью логических операций: not – НЕ (отрицание, инверсия); and – И (одновременное выполнение условий); or – ИЛИ (выполнение хотя бы одного из условий). Пример №4 (выполните программу в PascalABC и представьте изображение программы): "Определить, является ли заданное пользователем число двузначным и чётным". Program P4; Var a: integer; Begin writeln('Введите число '); readln(a); if (a>9) and (a<100) and (a mod 2 = 1) then writeln ('число удовлетворяет условию') else writeln ('число не удовлетворяет условию'); End. Пример №5 (выполните самостоятельно в PascalABC и представьте изображение программы): "Определить, является ли заданное пользователем число трёхзначным и кратным 3". Пример №6 (выполните самостоятельно в PascalABC и представьте изображение программы): "Определить вид треугольника (остроугольный, тупоугольный, прямоугольный), если известны его углы."