Тип данных. Функции обработки строк

Слайд 2

Тип данных: строка (набор символов, число которых ОПИСАНИЕ: VAR S: string[100];

Тип данных: строка (набор символов, число которых<=255)

ОПИСАНИЕ:
VAR S: string[100]; {число символов в

строке не более 100}
S1: string; {число символов может быть 255}
X,Y: byte;
СТРОКУ МОЖНО РАССМАТРИВАТЬ КАК ОДНОМЕРНЫЙ МАССИВ
ФУНКЦИИ ОБРАБОТКИ СТРОК:
S:=‘БАРНАУЛ – СТОЛИЦА МИРА’
X:=Length(S) {количество символов в строке S} {X=20}
Слайд 3

ФУНКЦИИ ОБРАБОТКИ СТРОК: S:=‘БАРНАУЛ – СТОЛИЦА МИРА’ S1:=‘МИР’ Y:=Pos(S1, S) Возвращает

ФУНКЦИИ ОБРАБОТКИ СТРОК:

S:=‘БАРНАУЛ – СТОЛИЦА МИРА’
S1:=‘МИР’
Y:=Pos(S1, S) Возвращает номер позиции,

начиная с которой в строке S располагается подстрока S1 (если значение функции равно нулю, то S не содержит S1). {Y=17}
Слайд 4

ФУНКЦИИ ОБРАБОТКИ СТРОК: S:=‘БАРНАУЛ – СТОЛИЦА МИРА’ S1:=‘_и вселенной’ S:=Сoncat(S,S1) выполняет

ФУНКЦИИ ОБРАБОТКИ СТРОК:

S:=‘БАРНАУЛ – СТОЛИЦА МИРА’
S1:=‘_и вселенной’
S:=Сoncat(S,S1) выполняет сцепку (конкатенацию) последовательности

строк.
S:=‘БАРНАУЛ – СТОЛИЦА МИРА_и вселенной’
Слайд 5

ФУНКЦИИ ОБРАБОТКИ СТРОК: S:=‘БАРНАУЛ – СТОЛИЦА МИРА’ S1:=Copy(S, 9,7) {S1:=Copy(S, i,k)}

ФУНКЦИИ ОБРАБОТКИ СТРОК:

S:=‘БАРНАУЛ – СТОЛИЦА МИРА’
S1:=Copy(S, 9,7) {S1:=Copy(S, i,k)}
Копирует подстроку из

строки S, начиная с позиции 9 и длиной 7 символов.
Слайд 6

ПРОЦЕДУРЫ ОБРАБОТКИ СТРОК: S:=‘БАРНАУЛ – СТОЛИЦА МИРА’ Delete(S, N,M) Удаляет M

ПРОЦЕДУРЫ ОБРАБОТКИ СТРОК:

S:=‘БАРНАУЛ – СТОЛИЦА МИРА’
Delete(S, N,M) Удаляет M символов

из строки S, начиная с позиции N.
Delete(S, 13,3)
{ S:=‘БАРНАУЛ – СТОЛ МИРА’}
Слайд 7

ПРОЦЕДУРЫ ОБРАБОТКИ СТРОК: S:=‘БАРНАУЛ – СТОЛИЦА МИРА’ S1:=‘__ и вселенной ’

ПРОЦЕДУРЫ ОБРАБОТКИ СТРОК:

S:=‘БАРНАУЛ – СТОЛИЦА МИРА’
S1:=‘__ и вселенной ’
Insert(S1,S,N)

Вставляет подстроку S1 в строку S, начиная с позиции N.
Insert(S1,S,21);
{S:=‘БАРНАУЛ – СТОЛИЦА МИРА __ и вселенной ’}
Слайд 8

ОБРАБОТКА ЦИФР В СТРОКЕ VAR S:STRING[25]; k, X, code:integer; Val(S, X,

ОБРАБОТКА ЦИФР В СТРОКЕ

VAR S:STRING[25]; k, X, code:integer;
Val(S, X, Code)
S:=‘452 ПРИВЕТ

123 ВСЕМ!’
For k:=1 to length(s) do
begin
val(S[k],x,code);
if code=0 then write(x);
end;