Есть числовой ряд: 101112…979899, в котором подряд выпи-саны все двузначные числа....

Question

Есть числовой ряд: 101112…979899, в котором подряд выпи-саны все двузначные числа. Определить двузначное число из этого ряда, образованное парой цифр, в которую входит k-ая цифра. Изначально в переменной k записан номер цифры (число в диапазоне от 1 до 180). Например, при k=4 надо выдать ответ: 11.

Answer 1

Var k,n: integer;
begin
  repeat
    write('k = '); readln(k);
  until k in [1..180];  
  n:=k mod 2 + k div 2 + 9;
  writeln(n);
end.