Удалить цифры из предложения - Turbo Pascal

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

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

Тема Множества. Дано предложение. В нем ошибочно набраны лишние знаки (цифры), удалить их. Результат отобразить на экране.

Решение задачи: «Удалить цифры из предложения»

textual
Листинг программы
var
  s: String;
  i: Integer;
begin
  Write('Предложение: '); ReadLn(s);
  for i:=Length(s) downto 1 do if s[i] in ['0'..'9'] then Delete(s,i,1);
  WriteLn('Результат: ',s);
end.

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


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

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

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