Создать программу, которая будет удалять символы введенные с клавиатуры - Pascal ABC

Узнай цену своей работы

Формулировка задачи:

Доброго времени суток. Мне нужна программа, которая удаляла бы введенные с клавиатуры символы. Что именно мне нужно: Есть ссылка - https !://pr !i!vnote .com/ Cf!1n QVw h#!r tOMdH!P e3. Мне нужно удалить из неё "!" и " " (пробелы). Сделайте, если не сложно и не могли бы Вы объяснить как потом юзать написанный Вами код :c
UP!

Решение задачи: «Создать программу, которая будет удалять символы введенные с клавиатуры»

textual
Листинг программы
begin
  var I:= ReadString('Введите символы, которые необходимо удалить: '); //var I:= '! '; //Строка недопустимых символов
  var Istr:= ReadString('Введите строку, из которой удалить необходимо удалить символы: '); //Входная строка
  var otv:= Istr.Where(x -> Pos(x,I,1) = 0); //Записывает в переменную otv, значения входной строки, если в ней нет недопустимых символов
  otv.Print(''); //Вывод ответа на экран
  Writeln();
end.

Объяснение кода листинга программы

  1. var I := ReadString('Введите символы, которые необходимо удалить: '); Символы, которые необходимо удалить, считываются в переменную I.
  2. var Istr := ReadString('Введите строку, из которой удалить необходимо удалить символы: '); Входная строка, из которой нужно удалить символы, считывается в переменную Istr.
  3. var otv := Istr.Where(x -> Pos(x, I, 1) = 0); В переменной otv хранятся значения входной строки, в которых нет недопустимых символов. Функция Pos() используется для проверки наличия символа в строке.
  4. otv.Print(''); Выводится ответ на экран.
  5. Writeln(); Выводится символ новой строки.

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

12   голосов , оценка 3.833 из 5
Похожие ответы