Разделы презентаций
- Разное
- Английский язык
- Астрономия
- Алгебра
- Биология
- География
- Геометрия
- Детские презентации
- Информатика
- История
- Литература
- Математика
- Медицина
- Менеджмент
- Музыка
- МХК
- Немецкий язык
- ОБЖ
- Обществознание
- Окружающий мир
- Педагогика
- Русский язык
- Технология
- Физика
- Философия
- Химия
- Шаблоны, картинки для презентаций
- Экология
- Экономика
- Юриспруденция
Строки в языке Pascal Классная работа Урок 5 4 22 апреля 2020 г
Содержание
- 1. Строки в языке Pascal Классная работа Урок 5 4 22 апреля 2020 г
- 2. §28 (стр. 185–189).Изучить презентацию урока.Вопросы 1–11 (стр.190) – устно.Задание 6 (стр. 190) – письменно.Домашнее задание
- 3. Чем плох массив символов?Это массив символов:Что нужно:обрабатывать
- 4. Символьные строкидлина строкирабочая частьs[1]s[2]s[3]s[4]var s:string;var s:string[20];Длина строки:n:=length(s);var n: integer;
- 5. ЗадачаЗадача: ввести строку с клавиатуры и заменить
- 6. Операции со строкамиОбъединение: добавить одну строку в
- 7. Удаление и вставкаУдаление части строки:Вставка в строку:s:='123456789';Delete(s,3,6);
- 8. Поиск в строкеПоиск в строке:s:='Здесь был Вася.';n:=Pos('е',s);if
- 9. Примерыs:='Вася Петя Митя';n:=Pos('Петя',s);Delete(s,n,4);Insert('Лена',s,n);'Вася Лена Митя's:='Вася Петя Митя';n:=length(s);s1:=Copy(s,1,4);s2:=Copy(s,11,4);s3:=Copy(s,6,4);s:=s3+s1+s2;n:=length(s);'Вася Митя'14'Вася''Митя''Петя''ПетяВасяМитя'126
- 10. Преобразования (классические способы языка) Из строки в
- 11. ЗадачаЗадача: Ввести имя, отчество и фамилию. Преобразовать
- 12. 1. Создать в личной папке файл strings.pas.
- 13. началоконецПреобразование строкиввод строкивывод строкиУкрупнённый алгоритм
- 14. Шпаргалка
- 15. Работаем за компьютером
- 16. Удачного программирования!
- 17. © С. Б. Лысенко,г. Ясиноватая, 2019school6.ya.dn.ua
- 18. Скачать презентанцию
§28 (стр. 185–189).Изучить презентацию урока.Вопросы 1–11 (стр.190) – устно.Задание 6 (стр. 190) – письменно.Домашнее задание
Слайды и текст этой презентации
Слайд 2§28 (стр. 185–189).
Изучить презентацию урока.
Вопросы 1–11 (стр.190) – устно.
Задание 6
(стр. 190) – письменно.
Слайд 3Чем плох массив символов?
Это массив символов:
Что нужно:
обрабатывать последовательность символов как
единое целое
последовательность символов должна иметь длину
const N=20;
var B: array[1..N] of
char;Что имеем:
каждый символ – отдельный объект;
Слайд 4Символьные строки
длина строки
рабочая часть
s[1]
s[2]
s[3]
s[4]
var s:string;
var s:string[20];
Длина строки:
n:=length(s);
var n: integer;
![Символьные строкидлина строкирабочая частьs[1]s[2]s[3]s[4]var s:string;var s:string[20];Длина строки:n:=length(s);var n: integer;](/img/tmb/7/642060/8bbfa0f18d158168cd4e1e4d2df8bba9-800x.jpg "Строки в языке Pascal
Классная работа
Урок 5 4
22 апреля 2020 г Символьные строкидлина строкирабочая частьs[1]s[2]s[3]s[4]var s:string;var s:string[20];Длина строки:n:=length(s);var n: integer;")
Слайд 5Задача
Задача: ввести строку с клавиатуры и заменить все буквы «а»
на буквы «б».
program qq;
var s:string;
i:integer;
begin
writeln('Введите строку');
readln(s);for i:=1 to Length(s) do
if s[i]='а' then s[i]:='б';
writeln(s);
end.
readln(s);
writeln(s);
Length(s)
ввод строки
длина строки
вывод строки
Слайд 6Операции со строками
Объединение: добавить одну строку в конец другой.
Присваивание нового
значения:
var s,s1,s2:string;
s:='Вася';
s1:='Привет';
s2:='Вася';
s:=s1+', '+s2+'!';
'Привет, Вася!'
Подстрока: скопировать часть строки в другую строку.
s:=
'123456789';s1:=Copy(s,3,6);
s2:=Copy(s1,2,3);
'345678'
'456'
с 3-его символа
6 штук
Слайд 7Удаление и вставка
Удаление части строки:
Вставка в строку:
s:='123456789';
Delete(s,3,6);
с 3-его символа
6
штук
строка
меняется!
'123456789'
'129'
s:='123456789';
Insert('ABC',s,3);
Insert('Q',s,5);
куда вставляем
что вставляем
начиная с 3-его символа
'12ABC3456789'
'12ABQC3456789'
Слайд 8Поиск в строке
Поиск в строке:
s:='Здесь был Вася.';
n:=Pos('е',s);
if n>0 then
writeln('Буква
е – это s[',n,']')
else writeln('Не нашли');
n:=Pos('Вася',s);
s1:=Copy(s,n,4);
s[3]
3
n = 11
Особенности:
функция возвращает номер
символа, с которого начинается образец в строкеесли слова нет, возвращается 0
поиск с начала (находится первое слово)
var n: integer;
![Поиск в строкеПоиск в строке:s:='Здесь был Вася.';n:=Pos('е',s);if n>0 then writeln('Буква е – это s[',n,']')else writeln('Не нашли');n:=Pos('Вася',s);s1:=Copy(s,n,4);s[3]3n =](/img/tmb/7/642060/80872a0dbe7371243390bc6fad24f332-800x.jpg "Строки в языке Pascal
Классная работа
Урок 5 4
22 апреля 2020 г Поиск в строкеПоиск в строке:s:='Здесь был Вася.';n:=Pos('е',s);if n>0 then writeln('Буква е")
Слайд 9Примеры
s:='Вася Петя Митя';
n:=Pos('Петя',s);
Delete(s,n,4);
Insert('Лена',s,n);
'Вася Лена Митя'
s:='Вася Петя Митя';
n:=length(s);
s1:=Copy(s,1,4);
s2:=Copy(s,11,4);
s3:=Copy(s,6,4);
s:=s3+s1+s2;
n:=length(s);
'Вася Митя'
14
'Вася'
'Митя'
'Петя'
'ПетяВасяМитя'
12
6
Слайд 10Преобразования
(классические способы языка)
Из строки в число:
s:='123';
Val(s,N,r);{N=123}
{r=0, если ошибки
не было
r – номер ошибочного символа}
s:='123.456';
Val(s,X,r); {X=123.456}
Из
числа в строку:N:=123;
Str(N,s); {'123'}
X:=123.456;
Str(X,s); {'1.234560E+002'}
Str(X:10:3,s); {' 123.456'}
var N,r: integer;
X: real;
s: string;
Слайд 11Задача
Задача: Ввести имя, отчество и фамилию. Преобразовать их к формату
«фамилия-инициалы».
Пример:
Имя, отчество и фамилия:
Василий Алибабаевич Хрюндиков
Результат:Хрюндиков В. А.
Алгоритм:
найти первый пробел и выделить имя
удалить имя с пробелом из основной строки
найти первый пробел и выделить отчество
удалить отчество с пробелом из основной строки
«склеить» фамилию, первые буквы имени и фамилии, точки, пробелы…
Слайд 121. Создать в личной папке файл strings.pas. Составить программу, которая преобразует
строку в формате в строку в формате
<Фамилия И. О.>2. Выполнить и отладить программу в среде Turbo.
Закрыть среду Turbo с сохранением файла.
3. Протестировать скомпилированную программу (STRINGS.EXE в личной папке).
Задание
4. Продемонстрировать работу программы при учителе.
