Инфоурок / Информатика / Презентации / Программирование. Строки и символы в PascalABC.net
Обращаем Ваше внимание: Министерство образования и науки рекомендует в 2017/2018 учебном году включать в программы воспитания и социализации образовательные события, приуроченные к году экологии (2017 год объявлен годом экологии и особо охраняемых природных территорий в Российской Федерации).

Учителям 1-11 классов и воспитателям дошкольных ОУ вместе с ребятами рекомендуем принять участие в международном конкурсе «Законы экологии», приуроченном к году экологии. Участники конкурса проверят свои знания правил поведения на природе, узнают интересные факты о животных и растениях, занесённых в Красную книгу России. Все ученики будут награждены красочными наградными материалами, а учителя получат бесплатные свидетельства о подготовке участников и призёров международного конкурса.

ПРИЁМ ЗАЯВОК ТОЛЬКО ДО 21 ОКТЯБРЯ!

Конкурс "Законы экологии"

Программирование. Строки и символы в PascalABC.net

библиотека
материалов
Программирование. Строки и символы в PascalABC.net Автор: Комкова М.С. Учител...
Описание переменных: Строки в Паскале – это данные типа string. var s: string...
В Паскале длина стандартной строки ограничена 255 символами. Под каждый симво...
Примеры описания строк: var s: string; s1: string[9]; s2: shortstring; begin...
Символ строки К отдельному символу строки можно обращаться как к элементу мас...
Чтобы узнать текущую длину, достаточно применить функцию ord к нулевому элеме...
Процедуры и функции для работы со строками Функция Concat (s1, s2, ..., sn) ...
Процедуры и функции для работы со строками Процедура Insert (subs, s, start) ...
Строки и массивы символов array of char рассматриваться как строка постоянной...
Вставка подстроки Задача:  Вставить в заданную позицию строки другую строку....
Замена подстроки в строке var s,s_old,s_new: string; i,l_old: byte; begin wri...
Копирование части строки Задача:  Скопировать часть строки с определенной поз...
Удалить пробелы между первым и вторым вопросительным знаком var str: string;...
Задача Дана непустая строка S и целое число N (>0). Вывести строку, содержащу...
Из заданной символьной строки выбрать те символы, которые встречаются в ней т...
Источники http://templated.ru/ingeneriya/117-informacionnye-tehnologii.html h...
16 1

Описание презентации по отдельным слайдам:

№ слайда 1 Программирование. Строки и символы в PascalABC.net Автор: Комкова М.С. Учител
Описание слайда:

Программирование. Строки и символы в PascalABC.net Автор: Комкова М.С. Учитель ИКТ, гимназия МИИТ, г. Москва

№ слайда 2 Описание переменных: Строки в Паскале – это данные типа string. var s: string
Описание слайда:

Описание переменных: Строки в Паскале – это данные типа string. var s: string; s1: string[9]; s2: shortstring; // синоним string[255] Они используются для хранения последовательностей символов.

№ слайда 3 В Паскале длина стандартной строки ограничена 255 символами. Под каждый симво
Описание слайда:

В Паскале длина стандартной строки ограничена 255 символами. Под каждый символ отводится по одному байту, в котором хранится код символа. Кроме того, каждая строка содержит еще дополнительный байт, в котором хранится длина строки.

№ слайда 4 Примеры описания строк: var s: string; s1: string[9]; s2: shortstring; begin
Описание слайда:

Примеры описания строк: var s: string; s1: string[9]; s2: shortstring; begin s := 'PascalABC.NET'; writeln(s,' ',s.Length); SetLength(s,20); writeln(s,' ',s.Length); s1 := s; writeln(s1,' ',s1.Length); end.

№ слайда 5 Символ строки К отдельному символу строки можно обращаться как к элементу мас
Описание слайда:

Символ строки К отдельному символу строки можно обращаться как к элементу массива символов, например s1[3]. Символ строки совместим с типом char, их можно использовать в выражениях одновременно, например: … s1[3] := 'h'; writeln (s2[3] + 'r');

№ слайда 6 Чтобы узнать текущую длину, достаточно применить функцию ord к нулевому элеме
Описание слайда:

Чтобы узнать текущую длину, достаточно применить функцию ord к нулевому элементу строки. Например: … writeln(ord(st[0]));

№ слайда 7 Процедуры и функции для работы со строками Функция Concat (s1, s2, ..., sn) 
Описание слайда:

Процедуры и функции для работы со строками Функция Concat (s1, s2, ..., sn)  возвращает строку, являющуюся слиянием строк s1, s2, ..., sn. Функция Copy (s, start, len) возвращает подстроку длиной len, начинающуюся с позиции start строки s. Процедура Delete (s, start, len) удаляет из строки s, начиная с позиции start, подстроку длиной len.

№ слайда 8 Процедуры и функции для работы со строками Процедура Insert (subs, s, start) 
Описание слайда:

Процедуры и функции для работы со строками Процедура Insert (subs, s, start) вставляет в строку s подстроку subs, начиная с позиции start. Функция Length (s) возвращает фактическую длину строки s, результат имеет тип byte. Функция Pos (subs, s) ищет вхождение подстроки subs в строку s и возвращает номер первого символа subs в s или нуль, если subs не содержится в s.

№ слайда 9 Строки и массивы символов array of char рассматриваться как строка постоянной
Описание слайда:

Строки и массивы символов array of char рассматриваться как строка постоянной длины 

№ слайда 10 Вставка подстроки Задача:  Вставить в заданную позицию строки другую строку.
Описание слайда:

Вставка подстроки Задача:  Вставить в заданную позицию строки другую строку. var s1,s2: string; i: byte; Begin write(‘Программа для вставки в заданную позицию строки другую строку'); write(‘Введите первый текст: '); readln(s1); write(‘Введите второй текст: '); readln(s2); write(‘Введите номер позиции, в которую надо вставить второй текст: '); readln(i); insert(s2,s1,i); writeln(s1); end.

№ слайда 11 Замена подстроки в строке var s,s_old,s_new: string; i,l_old: byte; begin wri
Описание слайда:

Замена подстроки в строке var s,s_old,s_new: string; i,l_old: byte; begin write(‘Ведите текст: '); readln(s); write(‘Что заменить?'); readln(s_old); l_old := length(s_old); write(‘ Чем заменить? '); readln(s_new); i := pos(s_old,s); delete(s,i,l_old); insert(s_new,s,i); writeln(s); readln end. Задача:  Найти в строке определенную последовательность символов и заменить ее другой.

№ слайда 12 Копирование части строки Задача:  Скопировать часть строки с определенной поз
Описание слайда:

Копирование части строки Задача:  Скопировать часть строки с определенной позиции и определенной длины в другую строку. var s1,s2: string; n,len: byte; begin write('Введите текст: '); readln(s1); write('Введите номер позиции, с которой будет копироваться строка: '); read(n); write(‘Введите длину копируемой части: '); readln(len); s2 := copy(s1,n,len); writeln('Ты скопировал: ',s2); readln; end.

№ слайда 13 Удалить пробелы между первым и вторым вопросительным знаком var str: string;
Описание слайда:

Удалить пробелы между первым и вторым вопросительным знаком var str: string; q1, q2, l, i: byte; begin readln(str); l := length(str); q1 := 0; q2 := 0; for i:=1 to l do if str[i] = '?' then begin q1 := i; break; end; for i:=q1+1 to l do if str[i] = '?' then begin q2 := i; break; end; if (q1 <> 0) and (q2 <> 0) then begin q1 := q1 + 1; while q1 < q2 do if str[q1] = ' ' then begin delete(str,q1,1); q2 := q2-1; end else q1 := q1 + 1; writeln(str); end; end. Задача:  Во введенной строке удалить пробелы между первым и вторым вопросительным знаком.

№ слайда 14 Задача Дана непустая строка S и целое число N (&gt;0). Вывести строку, содержащу
Описание слайда:

Задача Дана непустая строка S и целое число N (>0). Вывести строку, содержащую символы строки S, между которыми вставлено по N символов «*» (звездочка). program zvezda; Var s:string; N,i:integer; C:char; Begin Writeln('stroka'); Readln(s); Writeln('n'); Readln(n); C:='*'; For  i:=1 to n do Insert(c,s,n); Writeln(S); End.

№ слайда 15 Из заданной символьной строки выбрать те символы, которые встречаются в ней т
Описание слайда:

Из заданной символьной строки выбрать те символы, которые встречаются в ней только один раз Задача program m2; var s:String; i,j,n,k:Integer; f:Boolean; begin Writeln('Введите строку:'); Readln(s); n:=Length(s); for i:=1 to n do begin f:=True; for j:=1 to n do if (i<>j) and (s[i]=s[j]) then f:=False; if f and (k=0) then Writeln('Символы,которые встречаются в строке один раз:'); if f then begin Write(s[i],' '); inc(k); end; end; if k=0 then Writeln('В строке нет символов которые встречаются всего один раз.'); Readln; end.

№ слайда 16 Источники http://templated.ru/ingeneriya/117-informacionnye-tehnologii.html h
Описание слайда:

Источники http://templated.ru/ingeneriya/117-informacionnye-tehnologii.html http://pascalabc.net/wiki/index.php?title=Строки_и_символы._Тексты_программ http://www.cyberforum.ru/pascalabc-net/thread1266946.html http://pas1.ru/book/export/html/300 http://programmado.ru/55-stroki-v-paskale-tip-string.html http://mojainformatika.ru/paskal/uroki-paskal-stroki/116-stroki-v-paskal.html http://nschool.by/text.php?cat=library&textid=10


Самые низкие цены на курсы переподготовки

Специально для учителей, воспитателей и других работников системы образования действуют 50% скидки при обучении на курсах профессиональной переподготовки.

После окончания обучения выдаётся диплом о профессиональной переподготовке установленного образца с присвоением квалификации (признаётся при прохождении аттестации по всей России).

Обучение проходит заочно прямо на сайте проекта "Инфоурок", но в дипломе форма обучения не указывается.

Начало обучения ближайшей группы: 25 октября. Оплата возможна в беспроцентную рассрочку (10% в начале обучения и 90% в конце обучения)!

Подайте заявку на интересующий Вас курс сейчас: https://infourok.ru

Общая информация

Номер материала: ДВ-536571

Похожие материалы