Презентация на тему "Строки в Pascal"

Ваша оценка презентации
Оцените презентацию по шкале от 1 до 5 баллов
  • 1
  • 2
  • 3
  • 4
  • 5

Рецензии

Добавить свою рецензию

Аннотация к презентации

Презентация для школьников на тему "Строки в Pascal" по информатике. pptCloud.ru — удобный каталог с возможностью скачать powerpoint презентацию бесплатно.

  • Формат
    pptx (powerpoint)
  • Количество слайдов
    26
  • Слова
    pascal
  • Конспект
    Присутствует

Содержание

  • Слайд 1

     

    Автор: учитель информатики МКОУ Плесской СОШ Юдин А.Б. 2012 год Строки в Pascal pptcloud.ru

  • Слайд 2

     

    Строка - это массив символов, т.е. элементов типа char. В Паскале строке соответствует тип данных String. varИмя : string [Длина]; Если длина не указана, выделяется память под строку до 255 символов. Теория 1 var s1:string; строка 255 символов var s2:string[20]; строка 20 символов

  • Слайд 3

     

    Правила: строки равны только при одинаковом наборе символов и одинаковой длине; Например:'ABC'='ABC' и 'ABC'≠'abc' иначе происходит поэлементное сравнение символов по их кодам: '0'<'1'<...<'9'<'A'<...<'Z'<'a'<...<'z'<символы кириллицы Например: 'ADS'<'АДС' 65+68+83 < 192+196+209 (По таблице ASCII) Сравнение двух строк Теория 2 Сумма кодовстроки S1S2,

  • Слайд 4

     

    Теория 3 Соединение двух строк. s1:='2011' + ' год'; Writeln(s1); s1:='10'; s2:='класс'; s3:=s1+' '+s2; Writeln(s3);

  • Слайд 5

     

    ФункцияLength Функция Length(S) определяет текущую длину строки S. Результат — значение целого типа. Теория 4 PROGRAM Dlina_1; VAR S : STRING; n:INTEGER; BEGIN Writeln(введитеслово ') ; Readln(S); n:= Length (S) ; Writeln(‘введитеслово ', n:5 ,' букв..'); END. Записываем длину строки в переменную целого типа PROGRAM Dlina_2; VAR S : STRING; BEGIN Writeln(’введитеслово’) ; Readln(S); Writeln(’слово состоит из ’, Length (S),’букв. ’); END. Выводим на экран длину строки, как результат выполнения функции Задача 1.Составить программу подсчитывающую количество букв в слове.

  • Слайд 6

     

    Uses crt; var a,b:string; m,n:Integer; Begin Clrscr; Writeln('ВВеди первую строку ');Readln(a); Writeln('ВВеди вторую строку ');Readln(b); m:=Length(a); n:=Length(b); if (m=n) then writeln('Строкиравны'); if (m>n) then writeln('Перваябольше'); if (m

  • Слайд 7

     

    Функция Сору Функция Сору(S, P, N) выделяет из строки S подстроку длиной N символов, начиная с позиции P. Здесь N и P – целочисленные выражения. Теория 6 В фразе МАМА МЫЛА РАМУ слово РАМУ начинается с 11 буквы и состоит из 4 букв COPY(s1,11,4)

  • Слайд 8

     

    Задача 3. Составить программу осуществляющую вырезку из слова ИНФОРМАТИКА букв так, что бы из них получилось слово ТОРТ. Program n3_1; Uses crt; var a,b,c,d:string; Begin Clrscr; a:='информатика'; b:=''; c:=copy(a,8,1); d:=copy(a,4,2); b:=c+d+c; writeln(b); End. Задача на составление строк 7 Используем функцию работы с символьными переменными COPY Второй вариант: Program n3_2; Uses crt; var a,b:string; Begin Clrscr; a:=‘информатика'; b:=a[8]+a[4]+a[5]+a[8]; writeln(b); End. Используем определение строки как массива символов

  • Слайд 9

     

    Преобразование типов 8 Функция STR Str(x, S) преобразует число x в строковый формат. Где x – любое числовое выражение, S – строковая переменная. Задача 4 . Составьте программу которая выводит первую и последнюю цифру натурального числа, введенного с клавиатуры. PROGRAM Primer; uses Crt; VAR S: STRING; n:INTEGER; BEGIN Write('Введи число ');readln(n); Str(n,S); Writeln('Первая цифра -',S[1]); Writeln('Последняя цифра - ',S[length(S)]); END. Преобразуем натуральное число в строку

  • Слайд 10

     

    Процедура val позволяет преобразовать цифровые символы (изображение числа) в число. В общем виде обращение к процедуре выглядит так: VAL (Строка, Число, Код) ; где Строка – строковая константа или переменная, содержащая изображение числа; Число – переменная целого или дробного типа, которой должно быть присвоено значение Код – возвращаемый процедурой код ошибки (целое число) Преобразование типов 9 Процедура VAL

  • Слайд 11

     

    Преобразование типов 10 BEGIN s1:='123456789'; val(s1,n,code); Writeln(n); END. BEGIN s1:='123456789ABCDE'; val(s1,n,code); Writeln(n); END.

  • Слайд 12

     

    s1:='ABCDE123456789'; val(s1,n,code); Writeln(n); В PascalABC есть более развитый арсенал преобразованийкак в DELPHI: S:=IntToStr(N) - преобразует целое число к строке; n:=StrToInt(S)- преобразует строку в целое число S:=FloatToStr(r)- преобразует вещественное число к строке R:=StrToFloat(s) преобразует строку в вещественное число. Если преобразование невозможно, то возникает ошибка времени выполнения Преобразование типов 11

  • Слайд 13

     

    Преобразование типов 12 Задача 5.Дано строка символов а1+а2=. Где 1<=а1 и а2<=9. Составить программу, вычисляющую это выражение. Измените программу так, что бы вместо знака «+» можно было писать «-», «*», «/». VAR S: STRING; a,b,c:real; code:INTEGER; BEGIN Write(‘Введи выражение = ');read(s); val(s[1],a,code); val(s[3],b,code); if (s[2]='+') then c:=a+b; if (s[2]='-') then c:=a-b; if (s[2]='*') then c:=a*b; if (s[2]='/') then c:=a/b; clrscr; Writeln(s,c); END. Из строки берем первый и третий символ и преобразуем в число

  • Слайд 14

     

    Символы и их коды 13 Функции ORD и CHR Функция Ord(S) – определяет порядковый номер символа. Функция Chr(i) – определяет символ с порядковым номером i По номеру 255 выводим символ из кодовой таблицы Я

  • Слайд 15

     

    Символы и их коды 14 Задача 6.Составьте программу, которая по символу введенному с клавиатуры, выводит его номер в кодовой таблице. PROGRAM Primer; uses Crt; VAR S: char; n,code:INTEGER; BEGIN Write('Введи символ ');readln(s); Writeln('Символ ', s ,' имеет код -',ord(s)); END. Функция ORD работает только символьным типом данных

  • Слайд 16

     

    Задача 7. Дана строка символов. Определить сколько раз в ней встречается буква А (русская). Program n5; Uses Crt; Var s:string; i,k:integer; begin ClrScr; Write('ВВедистроку '); readln(s); k:=0; for i:=1 to length(s) do if (s[i]='А') then k:=k+1; writeln('Буква А встречается = ', k:8,' раз'); end. Перебираем от 1 до последней буквы Если на i-ом месте стоит А увеличиваем К на 1 Подсчет символов в строке 15

  • Слайд 17

     

    Замечание 16 for i:=1 to length(s) dobegin if (s[i]=…… if (s[i]=…… end; Замечание. Если требуется поиск нескольких символов в строке, то условия заключаем в программные скобки BEGIN … END

  • Слайд 18

     

    Подсчет символов в строке 17 Начало Ввод S i,1,length(s) Si ='A' К=К+1 Вывод К Конец Да Нет Блок-схема к задаче подсчета букв А в строке К=0

  • Слайд 19

     

    Замена символов в строке 18 Задача 8.Дана строка символов. Заменить в ней все буквы А на букву О. Program n6; Uses Crt; Var s:string; i:integer; begin ClrScr; Write('ВВедистроку '); readln(s); for i:=1 to length(s)do if (s[i]='A') then s[i]:='O'; writeln(s); end. Перебираем от 1 до последней буквы Если на i-ом месте стоит А ставим на i-е место О.

  • Слайд 20

     

    Замена символов в строке 19 Начало Ввод S i,1,length(s) Si ='A' Si ='O' Вывод S Конец Да Нет Блок-схема к задаче замен буквы А на О

  • Слайд 21

     

    Задача 9 Удалить из строки введенной с клавиатуры все буквы R(латинские, заглавные). Program n7; Uses Crt; var a,b:String; i:integer; begin ClrScr; Write('ВВедистроку = ');readln(a); b:=''; for i:=1 to length(a) doif (a[i]<>‘R') then b:=b+a[i]; a:=b; writeln(a); end. Перебираем от 1 до последней буквы Подготавливаем дополнительную переменную Если на i-ом месте не стоит R то прибавляем эту букву к тому, что есть в B То, что получилось в В перемещаем обратно в А Удаление символов из строки 20

  • Слайд 22

     

    Удаление символов из строки 21 Начало Ввод A i,1,length(A) Ai <>'R' B=B+ Ai Вывод А Конец Да Нет Блок-схема к задаче удаления букв R из строки B='' A=B

  • Слайд 23

     

    Вложенные условия. 22 begin clRscr; Readln(s); for i:=1 to length(s) do if (s[i]='а') or (s[i]='б') then if (s[i]='а') then s[i]:='б' else s[i]:='а'; writeln(s); end. Задача 10. В заданном тексте везде букву "а" заменить на букву "б",  а букву "б" - на букву "а". Из всей строки нам нужно выбрать только А и Б И только после осуществлять замену

  • Слайд 24

     

    Вложенные условия 23 Начало Ввод S i, 1, length(S) Si ='а' Si ='б' Si ='а' Вывод S Конец Si ='а' или Si ='б' Да Нет Да Нет Блок-схема к задаче замены А на Б и наоборот

  • Слайд 25

     

    Вложенные циклы 24 begin ClrScr; Write('ВВедистроку '); readln(s); s1:=',.;:"!?-'; for i:=1 to length(s1) do begin k:=0; for j:=1 to length(s) do if (s[j]=s1[i]) then k:=k+1; if (k<>0) then writeln(s1[i],' - ',k:5,' раз'); end; end. Задача 11. Дана строка символов, содержащая знаки препинания. Подсчитать какие и сколько знаков препинания содержит строка. Внешний цикл, осуществляющий перебор знаков записанных в S1 Тело внешнего цикла содержит цикл, отвечающий за перебор символов введенной строки

  • Слайд 26

     

    Вложенные циклы 25 Начало Ввод S i, 1, length(S1) s1=',.;:"!?-' K=0 j, 1, length(S) Sj = S1i Да Нет K=K+1 K<>0 Вывод S1i,K Нет Да Конец Блок-схема к задаче подсчета знаков препинания

Посмотреть все слайды

Конспект

�PAGE � �PAGE �1�

Описание к презентации «Строки в языке Pascal»

Данная презентация может быть использована при изучении темы «Строки в языке программирования Pascal» при обучении программированию на языке Pascal. В ней рассмотрены определение и описание строковой переменной, функции работы со строками, а также разобраны несколько типовых задач при работе со строками. Презентация со...

�PAGE � �PAGE �1�

Описание к презентации «Строки в языке Pascal»

Данная презентация может быть использована при изучении темы «Строки в языке программирования Pascal» при обучении программированию на языке Pascal. В ней рассмотрены определение и описание строковой переменной, функции работы со строками, а также разобраны несколько типовых задач при работе со строками. Презентация содержит 24 слайда, объединенных в 7 блоков.

Краткая навигация по слайдам и дополнительные задачи для самостоятельного решения учащимися:

Блок 1.

Теория.

Слайд 1. Дано определение строковой переменной, а также способ описания в разделе описания переменных.

Слайд 2. Показаны правила сравнения строк в языке Паскаль, и два примера иллюстрирующих эти правила.

Слайд 3. Показаны примеры объединения нескольких строк в одну.

Слайд 4. Дано определение функции Length(). И разобраны два решения задачи:

Составить программу подсчитывающую количество букв в слове.

Первый способ при помощи операции присваивания количество символов в строке присваивается переменной целого типа, и она выводится на экран. Во втором способе функция Length() вставлена непосредственно в оператор Writeln.

Слайд 5. Разобрано решение задачи:

Сравнить длину двух строк введенных с клавиатуры.

В ней необходимо определить длину двух строк и при помощи оператора ветвления сравнивать длины этих строк.

Слайд 6. Дано определение функции Copy(). При помощи скриншота показан пример работы данной функции с необходимыми комментариями.

Слайд 7. Показаны два способа решения задачи:

Составить программу осуществляющую вырезку из слова ИНФОРМАТИКА букв так, что бы из них получилось слово ТОРТ.

В первом случае вырезка производится при помощи функции Copy, а во втором используя представление строки как массива символов.

Задачи для дополнительного решения:

Составить программу, которая запрашивает имя человека и выводит его на экран с приветствием.

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

С клавиатуры вводятся две строки, определить, какая из них длиннее и насколько, вывести на экран соответствующее сообщение.

С клавиатуры вводится строка символов, вывести на экран символ, стоящий на k – ом месте. k – вводится с клавиатуры.

С клавиатуры вводится слово, верно ли, что оно начинается и заканчивается на одну и туже букву.

Дано два слова. Верно ли, что первое слово заканчивается на туже букву, на которую начинается второе.

Получите из слова "ИНТЕГРАЛ" слова "ГАНТЕЛИ", "РЕНТГЕН", "ТИГР", "АГЕНТ".

Составить программу которая проверяет правописание приставок раз- и рас- в слове введенном с клавиатуры и если необходимо исправляет ошибку.

Блок 2.

Функции преобразования типов.

Слайд 8. Дано описание процедуры Srt(). Разбирается решение задачи:

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

В ней натуральное число при помощи процедуры Str() преобразуется в строку, а затем на экран выводится первый и последний символ. Здесь обязательно необходимо сказать ученикам, что такой способ подойдет не для каждого случая, например в олимпиадных задачах часто ставится условие, что символьный тип данных использовать нельзя или (и) натуральное число содержит более 255 разрядов и т.д.

Слайд 9. Дано определение процедуры Val().

Слайд 10. Показаны примеры преобразования различных строк, содержащих цифры в натуральное число.

Слайд 11. Показаны функции для преобразования числовых и символьных типов в системе программирования PascalABC. Это может быть очень полезно если в дальнейшем планируется переход на изучение Lazarus или Delphi.

Слайд 12. Показано решение задачи:

Дано строка символов а1+а2=. Где 1<=а1 и а2<=9. Составить программу, вычисляющую это выражение. Измените программу так, что бы вместо знака «+» можно было писать « - », « * », « / ».

В ней рассмотрен самый простой случай, когда действия производятся с двумя натуральными одноразрядными числами. В дальнейшем от уровня учащихся эту задачу можно усложнять и усложнять. Добавив многоразрядные числа, отрицательные числа, взведение в степень, скобки и закончить, например вычислением или преобразованием польской записи.

Задачи для дополнительного решения:

Дана строка, изображающая десятичную запись целого положительного числа. Вывести строку изображающую двоичную запись того же числа.

Дана строка, изображающая целое положительное число. Найти сумму цифр этого числа.

Дан текст имеющий вид а1+а2 +а3+…+аi. Где аi – целые числа (0<=аi<=9). Составить программу, вычисляющую эту сумму.

Дан текст имеющий вид а1 - а2 + а3 - …+аi. Где аi – целые числа (0<=аi<=9). Составить программу, вычисляющую эту алгебраическую сумму.

Дано число в шестнадцатеричной системе счисления. Вывести строку изображающую десятичную запись того же числа.

Дана строка, изображающая двоичную запись целого положительного числа. Вывести строку изображающую десятичную запись того же числа.

Блок 3.

Функции работы с кодами символов.

Слайд 13. Дано определение функций ORD и CHR. Показан скриншот программы иллюстрирующий работу функции Chr.

Слайд 14. Показано решение задачи:

Составьте программу, которая по символу, введенному с клавиатуры, выводит его номер в кодовой таблице.

Здесь необходимо сделать замечание, что функция Ord работает только с символьным типом данных (char). Так как очень часто ученики не понимают разницы между символьным и строковым типом.

Блок 4.

Задачи на подсчет чего либо в строке.

Слайд 15. Показано решение задачи:

Дана строка символов. Определить сколько раз в ней встречается буква А (русская).

Данная задача иллюстрирует способ поиска символов в строке. Необходимо заметить, что для поиска строке в строке целесообразнее использовать функцию Copy.

Слайд 16. Содержит напоминание, что если требуется поиск нескольких символов в строке, то условия заключаем в программные скобки BEGIN … END

Слайд 17. Показана блок-схема к задаче из слайда 15.

Задачи для дополнительного решения:

Дана строка символов. Определить сколько раз в ней встречается буква А (русская).

Дана строка представляющая собой алгебраическое выражение Проверить в нем парность скобок. Результат вывести на экран.

Дан текст. Определить сколько в нем одинаковых соседних букв.

Дан текст. Определить количество слов в предложении.

Дан текст. Определить каких букв М или Н в нем больше.

Дан текст. Определить сколько слов в этом тексте начинается на букву А.

Дана строка символов, в которой есть двоеточие (:). Определить, сколько символов ему предшествует.

Дана строка символов. Определить сколько раз в нее входит группа букв АВС.

Дан текст. В нем есть, как минимум две буквы К. Определите порядковые номера первой и последней буквы К.

Дана текст. Определить какая из букв С или Т встретится раньше.

Дан текст. Определить количество букв Н, предшествующих первой запятой в предложении.

Дан текст, содержащий две запятые. Подсчитать количество символов расположенных между этими запятыми.

Блок 5.

Задачи на изменение символов в строке, без изменения ее длины.

Слайд 18. Показано решение задачи:

Дана строка символов. Заменить в ней все буквы А на букву О.

Данная задача показывает, как можно изменить строку не изменяя ее длинны.

Слайд 19. Показана блок-схема к задаче из слайда 18.

Задачи для дополнительного решения:

Дана строка символов. Заменить все буквы стоящие на четных местах на букву О.

Дана строка символов. Заменить в заданном тексте буквосочетание "min" на "max".

Дана строка символов. Заменить в ней все пробелы на знак «_».

Найдите первую и последнюю буквы К в тексте введенном с клавиатуры. И замените их «*».

Составить программу, исправляющую правописание «ЖИ» и «ШИ» в слове, введенном с клавиатуры.

Блок 6.

Задачи связанные с изменением длинны строки.

Слайд 20. Показано решение задачи:

Удалить из строки введенной с клавиатуры все буквы R (латинские, заглавные).

Данная задача показывает изменение строки с изменением ее длины.

Слайд 21. Показана блок-схема к задаче из слайда 20.

Задачи для дополнительного решения:

Удалить из строки введенной с клавиатуры все буквы А (латинские, заглавные).

Дано слово. Проверить, является ли оно перевертышем. Т. е. читается одинаково с конца и начала. (Например: АННА, ШАЛАШ.)

В заданном слове каждую букву "б" заменить буквосочетанием "ку".

Составить программу, удаляющую любую буквы из данного текста. (Текст и букву ввести с клавиатуры).

Для оформления заголовков и логически важных слов, символы текста чередуют с пробелами. Напишите программу, которая выполняет такую операцию.

Из данного текста удалить все буквы «С» которые предшествуют букве «Т».

После каждой буквы П вставить три знака восклицания «!!!».

Блок 7.

Задачи с вложенными ветвлениями и циклами.

Слайд 22. Показано решение задачи:

В заданном тексте везде букву "а" заменить на букву "б",  а букву "б" - на букву "а".

Прямое решение этой задачи «в лоб» не дает результата. Здесь требуется выделить только нужные буквы, что бы не изменялись остальные. А затем в зависимости от того какая буква найдена производить замену, используя полное условие.

Слайд 23. Показана блок-схема к задаче из слайда 22.

Слайд 24. Показано решение задачи:

Дана строка символов, содержащая знаки препинания. Подсчитать какие и сколько знаков препинания содержит строка.

Данная задача показывает пример использования вложенных циклов, для сравнения двух строк. Возможен вариант решения данной задачи с использованием большого числа условий, но такое решение, на мой взгляд, будет не рациональным.

Задачи для дополнительного решения:

Дана строка символов (русская). Определить количество гласных букв в этой строке.

Дана строка символов (английская). Определить какие и сколько гласных букв содержит строка.

Дана строка символов. Определить каких символов больше гласных или согласных.

Дана строка. Подсчитать сколько различных символов входит в эту строку. Результат вывести на экран.

Даны две строки А и В. Определить, можно ли из букв строки А составить строку В. Причем каждую букву можно использовать один раз. Буквы можно переставлять. (Например: из ИНТЕГРАЛ можно получить АГЕНТ, а ГРАФ нельзя).

Дан текст. Определить чего в нем больше цифр или букв.

Даны две строки. Подсчитайте и выведите на экран количество общих букв. (Букв встречающихся в первой и второй строке).

Из заданного текста выбрать и вывести на экран те символы, которые встречаются в нём ровно один раз.

Для предупреждения о провале операции Юстасом был придуман сле​дующий способ оповещения. Он отправляет телеграмму, в тексте которой встречаются символы "б", "е","д", "а", обязательно в таком порядке, но не обязательно подряд. Составить программу, позволяющую определить, является ли присланный текст оповещением о провале, или нет.

Для закрепления темы необходимо решать как можно больше задач. Их количество напрямую зависит от количества часов отведенных на изучение данной темы и курса программирования в целом.

На мой взгляд самыми удачными задачниками по программированию являются:

Сборник задач по программированию. 2-е издание. Автор Д.М. Златопольский. Изданный в СПб «БХВ-Петербург» в 2007 году.

Электронная версия задачника Programming Taskbook Версия 4.6. Автор М.Э.Абрамян. Распространяемый с системой программирования Pascal ABC.

В них представлены задачи по всем темам курса программирования.

Мною на основе этих задачников и некоторых других источников сделан собственный мини задачник с делением задач на три группы сложности А,В и С.

Ссылка на задачник:

http://privples.iv-edu.ru/informatica/1/Mater/SBORNIK_ZADAS.doc

Скачать конспект
Презентация будет доступна через 45 секунд