Методическое пособие по теме символьные массивы в Паскаль

Автор публикации:

Дата публикации:

Краткое описание: ...

var s: string[n]; var s: string;

Например, если st - это 'Строка', то st[1] - это 'С', st[2] - это 'т', st[3] - 'р' и т.д

Например: a := 'Turbo'; b := 'Pascal'; c := a + b; c станет равна 'TurboPascal'. 

операции сравнения <,>,=,<>,<=,>=.

Процедуры и функции для работы со строками:

  1. Length(s:string):integer;Пример:
    n := length('Pascal');

  2. Concat(s1,[s2,...,sn]:string):string;

  3. Copy(s:string; index:integer; count:integer):string;

Пример. 
s := 'Система Turbo Pascal';
s2 := copy(s, 1, 7);
s3 := copy(s, 9, 5);
s4 := copy(s, 15, 6);


 4) Delete(var s:string; index,count:integer);

Пример.
s := 'Система Turbo Pascal'
delete(s,8,6);



var s: string[n]; var s: string;

Например, если st - это 'Строка', то st[1] - это 'С', st[2] - это 'т', st[3] - 'р' и т.д

Например: a := 'Turbo'; b := 'Pascal'; c := a + b; c станет равна 'TurboPascal'. 

операции сравнения <,>,=,<>,<=,>=.

Процедуры и функции для работы со строками:

  1. Length(s:string):integer;Пример:
    n := length('Pascal');

  2. Concat(s1,[s2,...,sn]:string):string;

  3. Copy(s:string; index:integer; count:integer):string;

Пример. 
s := 'Система Turbo Pascal';
s2 := copy(s, 1, 7);
s3 := copy(s, 9, 5);
s4 := copy(s, 15, 6);


 4) Delete(var s:string; index,count:integer);

Пример.
s := 'Система Turbo Pascal'
delete(s,8,6);

  1. Insert(source:string; var s:string;index:integer);

Пример.
s := 'Система Pascal';
insert('Turbo ',s,9);

  1. Pos(substr,s:string):byte;

Пример.
s := 'Система Turbo Pascal';
x1 := pos('Pascal', s);

x2 := pos('Basic', s);

  1. Str(X: арифметическое выражение; var st: string);

  2. Val(st: string; x: числовая переменная; var code: integer);

  3. Chr(n: byte): char;

  4. Ord(ch: char): byte;

  5. UpCase(c: char): char;









  1. Insert(source:string; var s:string;index:integer);

Пример.
s := 'Система Pascal';
insert('Turbo ',s,9);

  1. Pos(substr,s:string):byte;

Пример.
s := 'Система Turbo Pascal';
x1 := pos('Pascal', s);

x2 := pos('Basic', s);

  1. Str(X: арифметическое выражение; var st: string);

  2. Val(st: string; x: числовая переменная; var code: integer);

  3. Chr(n: byte): char;

  4. Ord(ch: char): byte;

  5. UpCase(c: char): char;
Читать полностью »