Презентация к уроку "Символьные (строковые) величины в Pascal"
презентация к уроку по информатике и икт (10 класс) по теме

Слайд 1

Строковые величины Презентация подготовлена учителем информатики ГБОУ Лицей № 1561 Кондруховой Ольгой Васильевной

Слайд 2

Строковые величины В языке Паскаль существует стандартный тип данных, который называется символьным. К символьным переменным относятся: Латинские буквы; Русские буквы; Знаки препинания; Скобки; Цифры. В программах их значения всегда заключаются в апострофы: ‘F’, ‘12345’, ‘ Привет ’

Слайд 3

Строковые величины Последовательность символов, заключенная в апострофы, называется строкой и описывается типом string Строки, состоящие из 1 символа, называются символьными константами. У строки может быть указан размер (от 1 до 255): s1:string;( длина до 255 ) s1:string [80];( не более 80 символов )

Слайд 4

Строковые величины Какова длина строки? ‘ Привет, Вася! ’

Слайд 5

Строковые процедуры и функции

Слайд 6

Функции Length (st) Функция типа integer , определяет длину строки st . Concat (st1,st2) Функция типа string , объединяет строки st 1 и st2 . Copy (st,x,y) Функция типа string , х – номер символа, с которого начинается копирование, у – количество копируемых символов. Pos (st1,st) Функция типа integer , определяет позицию, с которой начинается строка st1 в строке st . Процедуры Delete (st,x,y) Удаление у символов из строки st , начиная с позиции х . Insert (st,st1, х ) Вставка строки st в строку st1 , начиная с позиции х . Str (n,st) Преобразовывает число n в строковую переменную st . Val (st,n,m) Преобразовывает строку st в число n , m – позиция символа.

Слайд 7

Определение длины строки program dlina; var st:string; l:integer; begin writeln(' Введите строку '); read(st); l:=length(st); write(' Длина = ',l); end.

Слайд 8

Операция конкатенации (+) program sceplenie; var a,b,c:string; begin a:=‘ бан '; b:=‘ ка '; c:=a+b; write(c); end.

Слайд 9

Операция вырезки program slovo; var a,b:string; begin a:=‘ информатика ’; b:=copy(a,3,5); write(b) end.

Слайд 10

Определить, сколько раз в данном слове встречается буква «а» program slovo; var s:string; l,i,k:integer; begin write(‘ Введите слово ’); read(s); l:=length(s); for i:=1 to l do if copy(s,i,1)=‘a’ then k:=k+1; write(k); end .

Слайд 11

Написать программу, которая выводит на экране сообщение в «телеграфном» стиле, т.е. буквы сообщения должны появляться по одной, причем с некоторой задержкой. program telegramma; uses crt; var c:string; n:integer; begin clrscr; c:=' Телеграмма '; for n:=1 to length(c) do begin write(c[n]); delay(1000); end; readkey end.

Слайд 12

Определить, является ли слово перевертышем program perevertish; var a,b,c:string; i:integer; begin writeln(' Введите слово '); read(a); for i:=length(a) downto 1 do begin c:=copy(a,i,1); b:=b+c; end; if a=b then write(' да ') else write(' нет ') end.