Question

С клавиатуры вводится целое число. Напиши программу, которая выводит "Да", если последняя цифра числа кратна 4, и "Нет" в остальных случаях.

Answer 1

===== PascalABC.NET =====

begin

 var n := Abs(ReadInteger('Введи целое число:'));

 if (n mod 10) mod 4 = 0 then

   Println('Да')

 else

   Println('Нет')

end.