В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
anton2015b
anton2015b
01.10.2022 09:08 •  Информатика

Всем привет. Не до конца разобралась в строковом типе данных в Паскале, хотелось бы на примере задачи немного вникнуть. Задача.
Дан текст из малых русских букв, состоящих из нескольких слов. Напечатать все гласные буквы, которые не входят ни в одно слово.

Важно: Помимо самой программы хотелось бы еще объяснение, чтобы понять, как выходим к результату. Заранее за ответы.

Показать ответ
Ответ:
sahsaperrucci
sahsaperrucci
13.05.2021 23:37

const glasnye:array[1..10] of string = ('а','е','ё','и','о','у','ы','э','ю','я');

var i:byte;

   s:string = 'Съешь ещё французских булок, да выпей чаю';

begin

   for i:=1 to length(glasnye) do begin

       if pos(glasnye[i],s) = 0 then write(glasnye[i],' ')  // если функция pos() возвращает не ноль, значит такая подстрока присутствует в строке, иначе pos() выводит 0.

   end;

end.

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота