Написать программу, которая в зависимости от введенного числа К, выполняет разные действия. Если число отрицательное или не делится на 4, то |K+5|, иначе K²+5.

var k:integer;    beginwriteln('введите число k');readln(k);if (k<0) or (k mod 4 <> 0) then writeln(abs(k+5))else writeln(sqr(k)+5);end.