27mod 3 =
41div 9 =
10 div4 +50 mod3 =

27 mod 3 = 0

41 div 9 = 4

10 div 4 + 50 mod 3 = 4

если хранить без знака, то диапазон от 0 до 15(2^3+2^2+2^1+2^0) 

var i,s: integer;

begin

writeln('summa ');

for i: =100 to 999 do

if i mod 17 =0 then s: =s+i else s: =s+0;

writeln(s)

end.