Составить программу для решения следующей задачи. Определить, сколько двузначных чисел, которые не делятся на 4. Результат вывести на
экран

PascalABC.NET:

!По школьной программе

var n: integer;beginfor var i := 10 to 99 doif i mod 4 <> 0 then n := n + 1;writeln(n);end.

!Не по школьной программе

begin(10..99).Count(c -> c mod 4 <> 0).Printend.