Строковой тип – это набор символов. Формат описания строкового типа string [n], где n количество возможных символов в описываемой величине. Максимальная длина строкового типа 256 символов. Если количество символов [n] не указано, то считается, что он имеет максимальную длину. В программе строковые типы записываются в апострофах.

Операции и функции Операция сцепления. Сцепляет несколько строк в одну: Ма+ма=Мама Операция отношения (=, =,<>). Сравнивает две строковые величины. Сравнение строк производится слева направо до первого несовпадающего символа и считается та строка больше, которая располагается дальше по алфавиту.

Delete (A, n, m) – удаляет m символов из А строки начиная с позиции n. Например: Delete (строка, 1, 3) останется ока Insert (A, B, n) – вставка строки А в строку В начиная с позиции n. Например: А:=раже; В:=выние Insert (A, B, 3).

Str (x, A) – преобразование числовой величины х, в строковую А. Val (A, x, n) – преобразует строковой тип А в число х. Copy (A, n, m) – выделяет из строки А подстроку длиной m символов, начиная с позиции n. B:=copy (123+45, 5, 2) присваивает В значение равное 45. Length (A) – вычисляет длину в символах строки А.

Задача 1. Ввести два натуральных числа, преобразовать в строку, сцепить, обратно преобразовать в число и извлечь квадратный корень. Результаты всех преобразований вывести на экран. Var n, m, k, c: integer; x, y, A: string; Begin Writeln (Введите два натуральных числа); Read (n, m); Str (n, x); Writeln (x, – строковая величина); Str (m, y); Writeln (y, – строковая величина); A:=x+y; Writeln (A, – строковая величина); Val (A, k, c); Writeln (k, code=,c); {выводится число k и значение кода c}; Writeln (sqrt(k), – квадратный корень числа, k); End.

Задача 2. Построить рисунок, используя вывод различных символов 1. Program Picture; 2. Begin 3. Writeln (|###>:14); Writeln (( |:10); 4. Writeln (((|:10); Writeln (( (|:10); 5. Writeln (( (|:10); Writeln (( (|:10); 6. Writeln (( (|:10); Writeln (|:10); 7. Writeln (##################:15); {18-#} 8. Writeln (# BEDA ##:17); 9. Writeln (############:15); {12-#} 10. Writeln (^^^^^^^^^^^^^^^^^^^^^^^^^) {25-^} 11.End.

Д/з. Составьте программу вывода на экран компьютера рисунка: * * a b * ***с*** *