Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
zdavatelzno
15.02.2020 10:51 •
Информатика
Паскаль даны целое число k (1≤ k≤ 180) и последовательность цифр , в которой выписаны подряд все двухзначные числа. определить k-ю цифру.
Показать ответ
Ответ:
olyarogova
01.10.2020 19:43
Var
k,i:integer;
s,x:string;
begin
for i:=10 to 99 do s:=s+IntToStr(i);
writeln(s);
write('Введите число k: ');
readln(k);
x:=s[k];
writeln(k,'-я цифра: ',x)
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
igor1337d
31.12.2021 18:40
В государстве все монеты имеют нечетный номинал. Известно, что максимальный номинал монеты 33, всего в обиходе 17 различных номиналов. Нумизмат Прохор собрал полную...
alexcozearschi
03.05.2020 15:32
В алфавите 32 буквы. Каков информационный вес одного символа? Выбери из списка правильный вариант ответа. ответы a) 8 битовb) 6 битовc) 5 битовd) 32 битаe) 4 бита...
Abl15
26.08.2020 01:44
Впишите слова-ответы 1.самый первый инструмент хранения информации 2.собственная (внутренняя) память человека (2 слова) 3.внешняя память-записные книжки,справочники...
Отличник1029
26.08.2020 01:44
Какие знаки не имеют названия? ! надо к 10...
qwer54321asdfrewq
24.06.2021 04:22
Какое минимальное количество бит потребуется для кодирования положительных чисел меньших 100...
Weronica98
05.07.2020 01:53
Определите принцип преобразования информации. что должно стоять вместо знака вопроса? 0 1 7 бр1 ? 4 4...
femalewolf1309
26.08.2022 01:14
Что такое в информатике прописные и строчные буквы...
Andriashka
21.08.2021 01:05
Для каких значений x и y истинно высказывание: (y+1 x) (y+x 0) (x 1)? 1) x = 0,5; y = -1,1 2) x = 1,1; y = -4 3) x = -1; y = -4 4) x = -0,1; y = -1,1...
darina2605
17.07.2022 14:58
2.решите уравнение 1005 + x = 2004. ответ запишите в семеричной системе счисления....
zentex
07.12.2022 10:32
Нужна ! про целое положительное число а сделаны четыре утверждения: а делится на 5 , а делится на 11 , а делится на 55 , а меньше 10 . известно, что два из этих утверждения...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
k,i:integer;
s,x:string;
begin
for i:=10 to 99 do s:=s+IntToStr(i);
writeln(s);
write('Введите число k: ');
readln(k);
x:=s[k];
writeln(k,'-я цифра: ',x)
end.