Текст отформатирован

с отступом
с выявлением ошибок
с переносом
с выступом

8, 1, 4, 1, 5, 9, 6, 7, 2

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.

пщояк 17 27 16 33 17

нщёп 15 27 7 17

20 - 25 = -5

-5 в десятичной системе