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

Question

Информатика

Аксён

11 марта, 07:59

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

+5

Ответы (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;