Презентация "Строковый тип" - 1 лекция.

Строковый тип 

1

Строка – это последовательность символов.
При использовании в выражениях строка заключается в апострофы.
‘Информатика’, ‘abc’, ‘1357’
Строка символов может состоять из одного или нескольких символов, а также не содержать ни одного символа (пустая строка или строка нулевой длины).
Количество символов в строке (длина строки) может динамически изменяться от 0 до 255.

2

Для определения данных строкового типа используется идентификатор string, за которым следует заключенное в квадратные скобки значение максимально допустимой длины строки данного типа. Если это значение не указывается, то по умолчанию длина строки равна 255 байт.
Переменную строкового типа можно определить через описание типа в разделе определения типов или непосредственно в разделе описания переменных.
А также строковые данные могут использоваться в программе также в качестве констант.
Недопустимо применение строковых переменных в качестве селектора в операторе case.

3

1. Type <имя типа>:string[макс. длина строки];
Var<идентификатор>:<имя типа>;

2. Var<идентификатор>:string<макс. длина строки>;

Const address=’ул. Смолина, 24a’; {строковая константа}
Type flot=string[125];
Var fstr:flot; {описание с заданием типа}
St:string;{по умолчанию длина строки=255}
St2, st3:string[50];{длина строки 50}
Natf:string[280];{ошибка, длина строки превышает 255}.

4

применяется для сцепления нескольких строк в одну результирующую строку.

Следует учитывать, что в операциях сцепления длина результирующей строки не должна превышать 255.

5

проводят сравнение двух строковых операндов и имеют более низкий приоритет, чем операция сцепления, т.е. вначале всегда выполняются все операции сцепления, если они присутствуют, и лишь потом реализуются операции отношения.
Сравнение строк производится слева направо до первого несовпадающего символа, и та строка считается больше, в которой первый несовпадающий символ имеет больший номер в стандартной таблице обмена информацией.
Результат выполнения операций отношения над строковыми операндами всегда имеет логический (булевский) тип.

6

‘MS-DOS’<’MS dos’ TRUE
‘program’>’PROGRAM’ TRUE
‘abcd’>abcD’ TRUE, т.к. ‘d’>’D’
‘abcd’<’abc ’ TRUE, т.к. ‘d’>’ ‘

7

8

S:= ‘информатика’
Функция LENGTH(S:string);
определение длины строки (слова).
length(s)=11
S:=‘студенты’;
write(length(s)); результат число 8

9

S:= ‘информатика’
2. Функция
COPY(S:string, P,K:integer);
выделение в слове S с позиции Р К символовwrite(copy(s,3,5)); - напечатается слово
‘форма’

copy(s,4,2);

- ‘ор’

copy(s,6,2)+copy(s,10,1);

- ‘мак’

10

S:= ‘информатика’
3. Функция  CONCAT(S1,S2,…,SN:string);
производит слияние слов.
Concat(‘про’,copy(s,3,5));
‘проформа’

11

S:= ‘информатика’
4. Процедура
DELETE(S:string,P,K:integer);
удаляет из строки S К символов, начиная с позиции Р.

delete(S,2,3);

12

S:= ‘информатика’
5. Процедура
INSERT(S1:string, S:string,P:integer);
вставляет строку S1 в слово S, начиная с позиции Р.
insert(‘a’,S,7);
‘информаатика’

13

S:= ‘информатика’
6. Функция POS(S1,S:string); - определение номера позиции, с которой слово S1 входит в S.

POS(‘фор’,s);

POS(‘ка’,s);

7. S[i]; - выделяет один символ с позиции i.

S[2];

14

15

program str1;
var s1,s2,s3,s4:string;
begin
s1:=‘Вам’;
s2:=‘привет’;
s3:=s1+s2;
s4:=s3+’!’;
writeln(s4);
end.

16

uses crt;
var s,b:string[10]; i:integer;
begin
write('slovo=');
readln(s);
b:='';
for i:=length(s) downto 1 do
b:=b+s[i];
write('b= ',b);
end.

17

uses crt;
var s:string[20]; i,k:integer;
begin
write('slovo=');
readln(s);
k:=0;
for i:=1 to length(s) do
if copy(s,i,1)='a' then k:=k+1;
write('k=',k);
end.

18

uses crt;
var s:string[20];
begin
write('slovo=');
readln(s);
s[1]:='*';
s[length(s)]:='*';
write('s=',s);
end.

19

uses crt;
var s:string[20];b:char;
begin
write('slovo=');
readln(s);
b:=s[length(s)];
s[length(s)]:=s[1];
s[1]:=b;
write('s=',s);
end.

20

uses crt;
var a,b,c:string[20]; i:integer;
begin
write('В строке='); readln(a);
write('Заменить '); readln(b);
write(' на '); readln(c);
i:=1;
repeat
if copy(a,i,length(b))=b
then a:=copy(a,1,i-1)+c+copy(a,i+length(b),length(a));
i:=i+1;
until i>length(a)-length(b)+1;
write('a=',a);
end.

21

uses crt;
var a:string; i,n1, n2:integer;
begin
write(‘Строка='); readln(a);
n1:=0; n2:=0;
for i:=1 to length(a) do
begin
if (copy(a,i,1)='k') and (n1=0) then n1:=i;
if (copy(a,i,1)='k') then n2:=i;
end;
writeln('n1=',n1, ' n2=',n2);
end.

22

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

23

Как в программе обозначается строковая константа, как определяется строковая переменная?
Какой может быть максимальная длина строки?
Что является результатом каждой функции, предназначенной для выполнения операций над строками?
Что является результатом действия функции length(s)?
Что является результатом действия функции Pos(s)?

24

Семакин И.Г. Информатика (базовый уровень). 10 класс. – М.: БИНОМ. Лаборатория знаний, 2019. – 264 с.

§28. Строки символов (стр. 183-188).
Работа 3.8. Программирование обработки строк символов (стр.255-257).

25