Question

Даны два числа, если сумма чисел четная, то разделить её на два, в противном случае добавьте единицу​

Answer 1

begin

 var (first, second) := readinteger2;

 if (first + second) mod 2 = 0 then

   print((first + second) div 2)

 else

   print(first + second + 1)

end.

Объяснение:

begin  // Начало программы

 var (first, second) := readinteger2;  // Считываем 2 числа с клавиатуры

 if (first + second) mod 2 = 0 then // Если сумма двух чисел чётная, тогда

   print((first + second) div 2) // Выводим сумму чисел,  деленную на 2

 else // Иначе

   print(first + second + 1)  // Выводим сумму чисел + 1

end. // Конец программы