Информатика, опубликовано 2018-08-22 22:11:29 by Гость
С клавиатуры вводится целое число k (1 ≤ k ≤ 180) . Определить k-ю цифру в последовательности двузначных чисел, выписанных подряд (1011121314............979899). Можно ли эту задачу решить без оператора if? Спасибо!
Ответ оставил Гость
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.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
Форма вопроса доступна на