tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Другие предметы
Исправить ошибки в тексте.
Исправить ошибки в тексте. Во все слова "длиный" вставить букву "н". (программа Паскаль)
advoumnaya
3 16.04.2019 23:00
1
Ответы
ДжузоСузуя13
16.04.2019 23:00
USES Crt;
VAR
S : STRING [50]; PZ, I: INTEGER;
BEGIN
ClrScr;
WriteLn(‘Введите текст’); ReadLn(S);
FOR I:=1 TO Length(S) DO
IF Copy(S,I,6)='длиный' THEN Insert('н',S,I+3);
WriteLn(‘Измененный текст:’); WriteLn(S);
END.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Другие предметы
Русель
16.10.2019 08:22
В.г караганде в мае месяце в 6: 00 +10 градусов в 9: 00+12градусов , в 15: 00+20 градусов .найдите среднесуточную температуру...
kitten0908
16.10.2019 08:20
Что лишнее? 1-подснежник 2-ромашка 3-медуница...
neketapro
16.10.2019 08:14
9. задайте линейную функцию , график которой параллелен прямой 5х-2у+8=0...
slava202011
16.10.2019 08:13
Скажите что такое романдык стиль и готикалык стиль ?...
alisaBacura
16.10.2019 08:09
5вопросов про тюльпаны на казахском языке....
Androidekstas
16.10.2019 08:08
Казахстана. ! эссе абылай хан политика, полководец, хан....
PleaseHelpMe4
16.10.2019 08:07
Что такое точка весеннего равноденствия ♈ , и где она 9 вопрос)...
Erosa51
16.09.2021 08:25
1) Чем занимается Министерство Юстиции? 2) Что по-вашему обязуется делать Комиссар?...
Komarova24
17.10.2020 06:55
1. Какова роль науки в самосознании человека? 2. Прочитайте текст. Объясните мнение Гегеля о знании и самосознании. Самосознание есть, прежде всего, простое для-себя-бытие, равноесебе...
Karakulova2004
17.10.2020 06:54
придумайте приветствие для незнакомых людей по типу:привет меня зовут Маша мне 18 лет я хочу начать общение и возможно этом человеком станешь именно ты. Я люблю осень и творческих...
Популярные вопросы
Спростити вираз: 8а22b + (- 5а22b + 4b22) - (а22b + 5b22 - 2) ...
2
Номер 364 1 25 42 от 51 25?...
1
Укажи верные утверждения для линейной функции y = kx + b, график которой изображен...
3
294. Работаем в паре Кбассейну подведены две трубы. Через первую трубу в бассейн...
1
*Какого слоя нет в плите Наска?1.гранитный2.базальтовый3.осадочный...
2
Напишите 3 имени героев и кратко их подвиг...
1
ЗАР ЗАМАН АҚЫНДАРЫНЫҢ ӨКІЛДЕРІ КІМДЕР...
2
Капитанская дочка: 1) О чем предупреждал генерал коменданта крепости в письме?...
1
СОСТАВИТЬ КРАТКИЙ РАССКАЗ ПРО СВОЙ КОРЕНЬ! Биология 6 класс ...
2
Как будет на англ языке чай...
2
VAR
S : STRING [50]; PZ, I: INTEGER;
BEGIN
ClrScr;
WriteLn(‘Введите текст’); ReadLn(S);
FOR I:=1 TO Length(S) DO
IF Copy(S,I,6)='длиный' THEN Insert('н',S,I+3);
WriteLn(‘Измененный текст:’); WriteLn(S);
END.