Склавиатуры вводится целое число k (1 ≤ k ≤ 180) . определить k-ю цифру в последовательности двузначных чисел, выписанных подряд (). можно ли эту решить без оператора if? !

jungkokBTSlove jungkokBTSlove    2   11.07.2019 22:00    3

Ответы
965845484152 965845484152  17.09.2020 23:59
Var
s,p:string;
i,n:integer;
begin
write('n = ');
readln(n);
for i := 10 to 99 do
 begin
 str(i,p);
 s := s + p;
 end;
writeln(s[n]); 
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика