Question

Определите, чему будет равно значение переменной ans после выполнения следующей программы:
ans := 0;
for i := 100 downto 1 do
if (i mod 49 = 0) or ((i mod 2 = 0) and (i <= 50)) then
ans := ans + 1;