Написать программу, которая из двух чисел с разной чётностью выводит на экран нечётное число. (PascalABC.NET)

В PascalABC.NET такую программу можно написать с помощью проверки остатка от деления числа на 2. Если число нечётное, то при делении на 2 оно даёт остаток 1. Так как одно из двух введённых чисел обязательно нечётное (по условию числа имеют разную чётность), достаточно проверить первое число, а затем вывести нужное.

Пример программы:

pascal
program OddNumber;
var
  a, b: integer;
begin
  readln(a, b);
  if a mod 2 <> 0 then
    writeln(a)
  else
    writeln(b);
end.

Объяснение:

• mod — операция нахождения остатка от деления.

• Если a mod 2 <> 0, значит число a нечётное.

• Если первое число оказалось чётным, то второе по условию обязательно нечётное, поэтому выводится b.

Например:

Ввод:

4 7

Проверяем:

• 4 mod 2 = 0 — число чётное;

• значит выводим второе число.

Вывод:

7

Другой вариант — проверить оба числа:

pascal
program OddNumber;
var
  a, b: integer;
begin
  readln(a, b);
  if a mod 2 <> 0 then
    writeln(a);
  if b mod 2 <> 0 then
    writeln(b);
end.

Но первый вариант короче и лучше подходит для условия, где заранее известно, что числа имеют разную чётность.