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

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

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

Показать ответ
Ответ:
Няшка9000
Няшка9000
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-бота