Question

Пожалуйста!!!!!!Даны трёхзначные натуральные числа n и k (n < k). Из чисел от n до k найти все, запись которых содержит ровно две одинаковые цифры. Например, числа 266, 661, 767, 776 – содержат ровно 2 одинаковые цифры.

Answer 1

// PascalABC.NET 3.0, сборка 1128
begin
  var n:=ReadInteger('n=');
  var k:=ReadInteger('k=');
  for var i:=n to k do begin
    var s:=i.toString;
    if ((s[1]=s[2]) and (s[1]<>s[3])) or
      ((s[1]<>s[2]) and ((s[3]=s[1]) or (s[3]=s[2]))) then
        Write(i,' ')
    end
end.

Тестовое решение:
n= 318
k= 427
322 323 330 331 332 334 335 336 337 338 339 343 344 353 355 363 366 373 377 383 388 393 399 400 404 411 414 422 424

Answer 2

Для решения этой задачи, нам нужно найти все трехзначные числа от `n` до `k`, у которых запись содержит ровно две одинаковые цифры.

Давайте разобьем задачу на более мелкие шаги:

1. Инициализ