Дано натуральное k от 1 до 180. Написать программу для определения цифры, которая находится в k-той позиции последовательности.10111213…9899.

1
а что за последовательность?
10111213…9899.

Ответы и объяснения

2013-10-31T21:01:30+04:00
Var
  k : integer;
begin
  read (k);
  if k mod 2 = 0 then
    writeln ((k div 2 - 1) mod 10)
  else writeln ((k div 2 - 1) div 10 + 1);
end.

вроде так
А можешь объяснить эту задачу....пример привести???
пожалуйста))))
ну, k div 2 - это номер пары чисел (то есть для 10 это будет 0, отсчет идет с нуля). потом, если цифра на четной позиции, то это единицы и нам нужны остаток от деления на 10 (опять таки, должно начинаться с нуля, поэтому надо отнять 1). если на нечетной, то это десятки, и надо взять целую часть от деления пары на 10, тут тоже самое, но так как отсчет идет с нуля, а последовательность начинается с 10, а не с 00, то надо еще в конце единичку прибавить. надеюсь, понятно...
спасибо большое)))) очень выручил!!!!