Главная

Удаление подстроки

сб, 03/19/2011 - 20:36 — tech
Темы учебника
Процедуры и функции для работы со строками
Задача: 

Удалить из строки ее часть с заданной позиции и заданной длины.

Описание переменных: 

s – строка;
i – номер символа в строке, начиная с которого будет осуществляться удаление;
len – длина удаляемой последовательности символов.

Алгоритм решения задачи: 
  1. Присвоить переменной s произвольную строку.
  2. Записать в i и len первый символ, с которого будет производиться удаление, и длину удаляемой последовательности.
  3. Применить процедуру delete() к строке s.
  4. Вывести на экран строку s.
Программа на языке Паскаль:  

var
    s: string;
    i,len: byte;
begin
    write('Input string: ');
    readln(s);
    write('Place of start to delete: ');
    readln(i);
    write('Length to delete: ');
    readln(len);
    delete(s,i,len);
    writeln(s);
readln
end.

Примечания: 

Процедура delete (s, start, len) удаляет из строки s, начиная с позиции start, подстроку длиной len.

  • Добавить комментарий

Комментарии

ср, 04/09/2014 - 14:05 — Гость

Вот такая задача.

Дана строка символов. Выделить подстроку между первой и последней точкой.
Вот что я хочу сделать: найти позицию первой точки. удалить все до первой точки. найти позицию последней точки. удалить все после последней точки.
Я уже удалил все до первой точки, но не знаю как найти позицию последней точки.

uses crt;
var
  m:string;
  i,n:integer;
Begin
  writeln('введите текст');
  readln(m);
  i:=pos('.',m);
  if i0 then
    begin
      delete(m,1,i);

Как найти позицию последней точки??

  • ответить
чт, 04/10/2014 - 19:16 — Гость

for i:= length(m) downto 1

for i:= length(m) downto 1 do
if s[i]:=' . ' then break
delete(m,i,length(m)-i);

  • ответить
Втр, 06/19/2012 - 09:41 — Гость (не проверено)

Удалить из текста слово

Удалить из текста слово >.

(конкретного текста и указания с тем, сколько дожно быть слов > нету).

  • ответить
Пнд, 05/16/2011 - 16:03 — Гость

здравствуйте! подскажите

здравствуйте! подскажите пожалуйста, а как поступить в том случае , если мне нужно удалить из строки все слова, имеющие менее 5 букв.

  • ответить
ср, 05/18/2011 - 11:03 — plustilino

Примерное решение задачи есть

Примерное решение задачи есть здесь: https://pas1.ru/deletewords

  • ответить