Символьные и строковые функции. Процедуры.

  • ppt
  • 16.02.2023
Публикация в СМИ для учителей

Публикация в СМИ для учителей

Бесплатное участие. Свидетельство СМИ сразу.
Мгновенные 10 документов в портфолио.

Иконка файла материала strokov-funkcii.ppt

Символьные и строковые функции. Процедуры.

Символьные переменные типа CHAR (чар) – значением переменной символьного типа может быть любой символ буквы, цифры, знаки операций, скобки, пробелы и специальные символы. Каждому символу алфавита соответствует индивидуальный код от 0 до 255.
Пример:
Var word: Char;

Строковые переменные типа STRING – у типа-строки в квадратных скобках может быть указан его размер (от 1 до 255). Если размер строки не указан, он считается равным 255.
Пример:
Var
Str: string[80];
MaxStr: string;

Значение S

Выражение

Результат

‘Мама мыла раму’

Copy(S, 6, 4);

‘мыла’

Функция Copy(S, Poz, N)

выделяет из строки S подстроку длиной N символов, начиная с позиции Poz.

Пример

Функции

Выражение

Результат

Concat(‘Мама ’,’мыла ’,’раму’)

‘Мама мыла раму’

Функция Concat(S1,S2,…,Sn)

выполняет сцепление строк S1,S2,…,Sn в одну строку. Конкатенация производится также с помощью знака +.


Пример

Значение S

Выражение

Результат

‘1500 символов’

Length(S)

13

Функция Length(S)

определяет текущую длину строки S.

Пример

Значение S2

Выражение

Результат

‘abcdef’

Pos(‘cd’,S2)

3

Pos(‘k’,S2)

0

Функция Pos(S1,S2) – определяет первое появление в строке S2 подстроки S1.

Пример

ORD(X)

Определение кода
символа X

CHR(X)

Определение символа
по его коду

Процедуры

Значение St

Выражение

Результат

‘абвгде’

Delete(St, 4, 2);

‘абве’

‘река Волга’

Delete(St, 1, 5);

‘Волга’

Процедура Delete(St, poz, n)

удаление n символов строки St, начиная с позиции Poz.
Пример

Значение S1

Значение S2

Оператор

Результат

‘ ЕС ’

‘ЭВМ1841’

Insert (S1, S2, 4);

‘ЭВМ ЕС 1841’

‘ N’

‘ Рис. 2’

Insert (S1, S2 , 6);

‘ Рис. N2’

Процедура Insert (S1, S2, Poz)

вставка строки S1 в строку S2, начиная с позиции Poz.
Пример

Program Primer1;
var b: string;
y: integer;
Begin b:='информатика';
y:=length(b); writeln(y);
End.

1.Задание Определить
длину строки слова ИНФОРМАТИКА

Program Primer2;
var a,b,c: string;
Begin
a:=' …….';
b:=' …….';
с:=a+b;
writeln(c);
End.

Задание С помощью + вывести на экран фамилию , имя

Program Primer4;
var a,b: string;
Begin
a:='информатика';
b:=copy(a,3,5);
writeln(a);
writeln(b);
End.

Использование функции копировать

Program Primer5;
var a: string;
Begin a:='Информатика'; writeln(a);
delete(a,3,7);
writeln(a); End.

Использование функции удалить

Program Primer6;
var a: string;
Begin
a:='Инка';
writeln(a);
insert('формати',a,3);
writeln(a);
End.

Использование функции вставки

Program Primer3;
var a: string;
y: integer;
Begin
a:='информатика';
writeln(a); y:=pos('р',a); writeln('y);
End.