Используя признаки делимости, написать программу в паскале, которая проверяет, делится ли натуральное число k на 4 (две последние цифры нули или образуют число, делящееся на 4).

program qwerty;var k, a:integer;beginreadln(k);a:=k mod 100;if(a=0) or (a mod 4=0) then write('Да')else write('Нет')end.

PascalABC.NET 3.3.5, сборка 1660 от 20.04.2018Внимание! Если программа не работает, обновите версию!begin  var k:=ReadInteger('n=');  var a:=k mod 10; // поледняя цифра  var b:=(k mod 100) div 10; // предпоследняя цифра  if (a=0) and (b=0) or ((10*b+a) mod 4=0) then Writeln('Делится на 4')  else Writeln('Не делится на 4')end.Примерn= 567264Делится на 4