Даны целое число k (1< =k< =252) и последовательность цифр , в которой выписаны подряд все натуральные числа от 50 до 250. нужно. определить k-ую цифру.
297
398
Ответы на вопрос:
//pascalabc.net 3.1 сборка 1200 var s: string; k, i: integer; begin readln(k); for i : = 50 to 250 do s : = s + inttostr(i); writeln(s[k]); end.
Популярно: Информатика
-
elizavetkanaum04.01.2022 00:17
-
Fashion25821.12.2020 23:38
-
aliceBRATSKAIA18.09.2020 08:06
-
Svetik20061111.09.2021 21:05
-
temaimcheg05.08.2020 15:37
-
ssofia14popova05.12.2021 22:38
-
kristinapaskan02.06.2020 13:39
-
prosto1242111.07.2020 21:35
-
mix4201.11.2021 08:24
-
vashik047p08sj507.06.2022 23:46