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

var s: string[n]; var s: string;
Например, если st - это 'Строка', то st[1] - это 'С', st[2] - это 'т', st[3] - 'р' и т.д
Например: a := 'Turbo'; b := 'Pascal'; c := a + b; c станет равна 'TurboPascal'. 
операции сравнения <,>,=,<>,<=,>=.
Процедуры и функции для работы со строками:
Length(s:string):integer;Пример: n := length('Pascal');
Concat(s1,[s2,...,sn]:string):string;
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'. 
операции сравнения <,>,=,<>,<=,>=.
Процедуры и функции для работы со строками:
Length(s:string):integer;Пример: n := length('Pascal');
Concat(s1,[s2,...,sn]:string):string;
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);
Insert(s
·ource:string; var s:string;index:integer);
Пример. s := 'Система Pascal'; insert('Turbo ',s,9);
Pos(substr,s:string):byte;
Пример. s := 'Система Turbo Pascal'; x1 := pos('Pascal', s);
x2 := pos('Basic', s);
Str(X: арифметическое выражение; var st: string);
Val(st: string; x: числовая переменная; var code: integer);
Chr(n: byte): char;
Ord(ch: char): byte;
UpCase(c: char): char;








Insert(source:string; var s:string;index:integer);
Пример. s := 'Система Pascal'; insert('Turbo ',s,9);
Pos(substr,s:string):byte;
Пример. s := 'Система Turbo Pascal'; x1 := pos('Pascal', s);
x2 := pos('Basic', s);
Str(X: арифметическое выражение; var st: string);
Val(st: string; x: числовая переменная; var code: integer);
Chr(n: byte): char;
Ord(ch: char): byte;
UpCase(c: char): char;

15