Условный оператор в Паскале. 1. Полный условный оператор. 2. Неполный условный оператор. 3. Составные условия.

1.Полный условный оператор. Используется, когда в программе возможны два варианта действия и выбор действия зависит от условия. Оформление: If ( условие ) then ( 1действие ) else ( 2действие ); Если тогда иначе Пример: Даны число. Является ли оно четным? Для решения необходимо использовать операторы: Div - целочисленное деление; 10 div 3 (= 3) mod – определение остатка; 10 mod 3 (= 1 ).

Решение поставленной задачи. Program chetnost; uses crt; Var a:word; Begin Clrscr; Write ( Введите число ); readln (a); If a div 2 = 0 then writeln(честное) else writeln(нечетное); Readln; end. Запуск программы: ctrl+F9

2. Неполный условный оператор. Используется, когда некоторое действие выполняется не всегда, а при определенном условии. Оформление: If (условие) then (действие) ; Пример: Даны 3 целых числа. Определить среди них отрицательные? Решение: … write (Введите 3 целых числа через пробел); readln(a,b,c); if a > 0 then writeln(a, отрицательное число); if b > 0 then writeln(b, отрицательное число); if c > 0 then writeln(c, отрицательное число); …