У скольких натуральных чисел от 1 до 2 в степени N, где N = 10, сумма цифр кратна четырем? Комментарий. Например, для N=3N=3 рассматриваются такие числа: 1, 2, 3, 4, ..., 8. Сумма цифр кратна четырем у двух из них.

Составим цикл нахождения количества чисел для языке программирования Pascal

var i, i2, sum, ans:integer;

s:string;

begin

for i:=1 to 1024 do

begin

sum:=0

s:=IntToStr (i);

for i2:=1 to length (s) do

sum:=sum+StrToInt (s[i2]);

if sum mod 4 = 0 then

inc (ans);

end;

writeln (ans);

end.