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

Question

Информатика

Виталя

1 июля, 01:40

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

+2

Ответы (1)

Знаешь ответ?

Леонинка · Answer 1

Program test;

Var

a:string;

k, i, i1:integer;

Begin

If k<=180 then begin

For i:=1 to 9 do begin

For i1:=0 to 9 do a:=a+str (i*10+i1);

End;

If k mod 2 = 0 then writeln (copy (a, k-1,2));

Else writeln (copy (a, k, 2);

End;

Else writeln ('Введённое число больше допустимого значения');

End;