Question

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

Answer 1

PascalABC.NET:

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

• var n: integer;
• begin
• for var i := 10 to 99 do
• if i mod 4 <> 0 then n := n + 1;
• writeln(n);
• end.

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

• begin
• (10..99).Count(c -> c mod 4 <> 0).Print
• end.