Написать функцию, которая в заданном слове удаляет заданную букву - 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.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д