Нати сумму чисел от а до в, квадраты которых делятся на 7 (паскаль)

Объясните, пожалуйста, почему "b-a" в строчке for i

Извините, должно быть просто b, исправлено

var a,b,i,s:integer;beginwrite('a = '); readln(a);write('b = '); readln(b);s:=0;for i:=a to b do if i*i mod 7 = 0 then s:=s+i;writeln('s = ',s);end.Пример:a = 1b = 30s = 70

Думаю, что числа целые. Тогда может получиться так:var a,b,s,i: integer;begin  writeln('Введите два числа');  readln(a,b);  for i:=a to b do     if sqr(i) mod 7 = 0 then s:=s+i;  writeln(s);end.