Количество чисел ** промежутке -11;100 кратным 4 Turbo

Question

Количество чисел на промежутке -11;100 кратным 4 Turbo

Answer 1

var n,i:integer;

begin

n:=0;

for i:=-11 to 100 do

  if i mod 4=0 then n:=n+1;

writeln(n);

end.

Тестовое решение:

28