Написать функцию, которая в заданном слове удаляет заданную букву - Turbo Pascal
Формулировка задачи:
написать функцию, которая в заданном слове удаляет заданную букву(буквы и слово вводятся с клав)
Решение задачи: «Написать функцию, которая в заданном слове удаляет заданную букву»
textual
Листинг программы
var i: Integer; s: String; c: Char; begin Write('Строка: '); ReadLn(s); Write('Символ: '); ReadLn(c); for i:=Length(s) downto 1 do if s[i]=c then Delete(s,i,1); WriteLn('Результат: ',s); end.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д