Условное ветвление (разбор задачи 3 урока 10)

Задача 3 урока 10.0:

Условие задачи:

Пользователь вводит 2 целых числа, выведите на экран не более 1 из этих чисел, которые делятся нацело на 4 (т.е. нужно вывести те числа, которые делятся на 4, но не более одного).

Возможное решение

Так как в задаче требуется вывести только одно число, сначала следует проверить число a на соответствие условию, и только если условие ложно (то есть a не делится нацело на 4), проверить число b. Для этого следует ввести блок else. Вводить проверку на соответствие условию обоих чисел сразу не имеет смысла, так как выведется всё равно только одно число.

program u10z3;
var a, b: integer;
begin
  writeln('Vvedite a, b:');
  readln(a, b);
  if (a mod 4 = 0)) then
    writeln(a)
  else if (b mod 4 = 0) then
    writeln(b);
  readln();
end.