Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
lpozzz
29.09.2021 22:29 •
Информатика
дано предложение,оканчивающееся символом "_".вставить заданную букву перед последней буквой "и".
Показать ответ
Ответ:
1232960
31.07.2020 12:17
Var S:string;
c:char;
i,k,N:integer;
begin
Readln(S);
Readln(c);
N:=length(S);
For i:=N downto 1 do
If S[i]:='и' then
begin
k:=i;
break;
end;
For i:=N+1 to downto k do
S[i]:=S[i-1];
S[k]:=c;
Writeln(S);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
vadimkaIVA
13.10.2020 00:14
На python. компьютер в первую секунду печатает на экране число 1, во вторую – число 12, в третью – число 23. то есть, в каждую следующую секунду – на 11 больше, чем в предыдущую....
erdgfgh
01.02.2021 18:18
Вчисловой последовательности вводимость клавиатуры, вычислить количество чисел кратных 6...
cccggg93
04.11.2022 01:37
Программа в pascal. создать линейный числовой массив b[10]. заполнить его целыми числами интервала (-10,10) . в данном числовом массиве поменять местами максимальные и минимальные...
anncopper
20.04.2020 23:59
Напишите алгоритм возведения числа а в натуральную степень n...
pirmnastia
27.02.2020 02:20
Для хранения 1 сек звукозаписи звука, амплитуда которого измеряется 22000 раз в секунду, а запись каждого результата измерения имеет информационный объем 16 бит. сколько потребуется...
svetaredkina
08.10.2020 09:33
Расставить запятые 1.мальчики сидели за столом и склонив головы шепотом произносили какие-то слова. 2.когда он разбуженный чьими-то голосами проснулся было уже совсем темно. 3.в...
ilslim
13.08.2020 17:26
Как удалось парубку заполучить в невесты красавицы параску?...
filanovich1984
06.12.2022 09:39
12. какое из неравенств будет верным, если a, b, c-отрицательные числа и 1,2-a=0,9-b=1,5-с? а) a b b) a b c c) b a c d ) a c b...
Obzzzi
24.08.2021 08:43
Треугольники abc и a b c подобны. ab = 5 м, bc = 7 м, a b = 10 м, a c = 8 м. найдите остальные стороны треугольника....
1298school
24.08.2021 08:43
Упочатковий момент активність деякої радіоактивної речовини складала 1,2∙107 бк. якою буде активність цієї речовини через проміжок часу, який дорівнює періоду її напіврозпаду?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
c:char;
i,k,N:integer;
begin
Readln(S);
Readln(c);
N:=length(S);
For i:=N downto 1 do
If S[i]:='и' then
begin
k:=i;
break;
end;
For i:=N+1 to downto k do
S[i]:=S[i-1];
S[k]:=c;
Writeln(S);
end.