Определить номера позиций в строке символа пробел

18.12.2013, 16:31. **Показов** 9317. **Ответов** 2

Author24 — интернет-сервис помощи студентам

Определить номера позиций в строке символа пробел

Друзья помогите пожалуйста

@APALoff · 18.12.2013, 17:11

Вам понадобятся:

function Pos(subs,s: string): integer;
Возвращает позицию подстроки subs в строке s. Если не найдена, возвращает 0

procedure Delete(var s: string; index,count: integer);
Удаляет из строки s count символов с позиции index

@TFS · 18.12.2013, 17:19

Pascal

program SpacesPos;
 
const strExample = 'Проверочная строка, которая содержит несколько пробелов.';
 
var i, nStrLen : Integer;
 
begin
 nStrLen:=Length(strExample);
 Write('Позиции пробелов в строке:');
 
 For i:=1 to nStrLen do
  If strExample[i]=' ' then
    Write(' ',i);
end.

Giga2345
		1
	Определить номера позиций в строке символа пробел 18.12.2013, 16:31. Показов 9317. Ответов 2 Метки нет (Все метки) Определить номера позиций в строке символа пробел Друзья помогите пожалуйста

@APALoff 1646 / 1075 / 1081 Регистрация: 03.07.2013 Сообщений: 4,507
	18.12.2013, 17:11	2
	Вам понадобятся: function Pos(subs,s: string): integer; Возвращает позицию подстроки subs в строке s. Если не найдена, возвращает 0 procedure Delete(var s: string; index,count: integer); Удаляет из строки s count символов с позиции index 0

	18.12.2013, 17:19

Опции темы

Определить номера позиций в строке символа пробел

Решение