Question

Начали изучать Паскаль и дали вот такую задачу:С клавиатуры вводится целое число k (1 ≤ k ≤ 180) . Определить k-ю цифру в последовательности двузначных чисел, выписанных подряд (1011121314............979899).Помогите решить пожалуйста и желательно объясните.Буду очень благодарен.Спасибо.

Answer 1

Двухзначное число имеет два разряда - десятки и единицы. Если k нечетное, то это цифра десятков в числе, а если четное - цифра единиц. А само число определяется как 10 плюс частное от целочисленного деления k-1 на 2.

var
  n, k: integer;

begin
  Write('Введите натуральное число k (k<=180): ');
  Readln(k);
  n := 10 + (k - 1) div 2;
  if (k mod 2 = 0) then n := n mod 10
  else n := n div 10;
  Writeln('Искомая цифра- ', n)
end.

Тестовое решение:
Введите натуральное число k (k<=180): 7
Искомая цифра- 1

Answer 2

Можно. Сгенерировать в цикле текстовую строку и выбрать в ней k-й символ)))

Answer 3

Я понял как сделать с if и then,но проблема в том,что нам сказали не использовать if и then/

Answer 4

так это проблема алгоритмического плана. Надо было в условии писать, что использовать этот оператор нельзя.

Answer 5

Все равно спасибо вам.Я очень вам блогадарен.

Answer 6

Благодарен*