Рассмотрим второе число 6 : у него 0 десятков 0=2^0-1 третье: 16 : один десяток (1) 1=2^1-1 четвёртое: 36 три десятка 3=2^2-1 пятое 76 7=2^3-1 шестое 156 15=2^4 -1
Рассмотрим второе число 6 : у него 0 десятков 0=2^0-1 третье: 16 : один десяток (1) 1=2^1-1 четвёртое: 36 три десятка 3=2^2-1 пятое 76 7=2^3-1 шестое 156 15=2^4 -1
var n: integer;
begin
n: =200;
while n mod 17< > 0 do
n: =n+1;
write('n=',n);
end.
вроде !