Шешель Анжелика

Значения: Символьная величина – 1 символ (буква, цифра, знак) Строковая величина – строка символов

Описание: var имя_переменной: char; Операции: Присваивание (имя_переменной:=значение;); Ввод и вывод(write, writeln, read, readln ); Сцепление (+); Сравнение (=, =,, ).

Ord(s) – определяет код символа s; Chr(n) – возвращает символ с кодом n; Pred(s) – возвращает предыдущий символ; Succ(s) – возвращает следующий символ.

Program Primer1; Var a, b, c, d: char; Begin a:=Y; b:=P; c:=A; Write (Введите символ:); Read(d); Writeln (a+b+c+d); End. Program Primer2; Var a: char; Begin Write(Введите символ); Read (a); If (ord(a)>=48) and (ord(a)=65) and (ord(a) =97) and (ord(a)

Program Primer3; Var a: char; Begin Write (Введите символ:); Read(a); Writeln(пред=, pred(a),след=,succ(a)); End. Program Primer4; Var k: integer; Begin For k:=32 to 255 do begin Write(k:4, chr(k):2, ); If k mod 8 = 7 then writeln; End; End.

Описание: var имя: string; var имя: string[n]; n – длина строки; 1

Length(s) - функция для определения строковой переменной; Pos(s1,s) - определяет с какого символа подстрока s1 содержится в строке s; Copy - копирует символы из строки; Delete - удаляет символы из строки; Insert - вставляет подстроку в строку; Str – преобразование типов данных.

Program primer1; Var a,b: string; Begin Writeln(введите два слова); Read(a,b); If length(a)> length(b) then writeln(a) else writeln(b); End. Program primer2; Var s,s1: string; Begin s:= кашу ела маша; s1:= copy(s,6,3); Writeln(s); Writeln(s1); End.

Program primer3; Var s,s1: string; Begin s:=Журавли на юг летят; s1:=птицы; Writeln(s); Delete(s,1,7); Writeln(s); Insert(s1,s,1); Writeln(s); End. Program primer4; Var a,b:integer; sa,sb:string; Begin Write(введите два числа:); Readln (a,b); Writeln(сумма чисел:,a,+,b,=,a+b); Str(a,sa); str(b,sb); Writeln (сцепление строк:,sa,+,sb,=, sa+sb); End.