Question

Сколько различных значений числа d можно ввести, чтобы после выполнения программы было напечатано 196? var n, s, d: integer; begin readln(d); n := 7; s := 35; while s <= 2570 do begin s := s + d; n := n + 9 end; write(n) end.