Презентация по теме строки в Турбо Паскале

• 1 слайд

  Задачи
  домашней контрольной работы
  

• 2 слайд

  1. Задан массив из N элементов (целые числа). Заменить все элементы, кратные 3 и 5 на ноль. Использовать функцию.
  Система тестов:
  

• 3 слайд

  2. Задан массив из N элементов (действительные числа). Поменять местами наибольший и наименьший элементы массива. Использовать процедуру.
  Система тестов:
  

• 4 слайд

  
  
  3. Задан массив из N элементов (целые числа). Определить есть ли в нем простые числа, если есть, то вывести их номера и значения на экран. Использовать функцию.
  Система тестов:
  

• 5 слайд

  ДИКТАНТ
  

• 6 слайд

  ЦИКЛ С УСЛОВИЕМ
  ЦИКЛ С ПОСТУСЛОВИЕМ
  ОПЕРАТОР ВЫБОРА
  ОБЪЯВЛЕНИЕ ПЕРЕМЕННЫХ
  УСЛОВНЫЙ ОПЕРАТОР
  ЦИКЛ С ПАРАМЕТРОМ
  ОБЪЯВЛЕНИЕ ФУНКЦИИ
  ОБЪЯВЛЕНИЕ ТИПОВ
  СОСТАВНОЙ ОПЕРАТОР
  ОБЪЯВЛЕНИЕ ПРОЦЕДУРЫ
  

• 7 слайд

  ОТВЕТЫ
  ЦИКЛ С УСЛОВИЕМ
  While логическое выражение Do оператор;
  ЦИКЛ С ПОСТУСЛОВИЕМ
  Repeat тело цикла Until логическое выражение;
  ОПЕРАТОР ВЫБОРА
  Case Выражение-селектор of
  СписокКонстант1:оператор;
  …
  СписокКонстантN:оператор;
  [else оператор]
  end;
  ОБЪЯВЛЕНИЕ ПЕРЕМЕННЫХ
  Var имяПеремен1,…,имяПеременN:ТипПеременной;
  УСЛОВНЫЙ ОПЕРАТОР
  If логическое выражение Then оператор1 [Else оператор2];
  ЦИКЛ С ПАРАМЕТРОМ
  For счетчик:=НачальнЗнач To КонечнЗнач do оператор;
  For счетчик:=КонечнЗнач Downto НачальнЗнач do оператор;
  ОБЪЯВЛЕНИЕ ФУНКЦИИ
  Function ИмяФункции ([ФормальныеПарам]):ТипРезультата;
  ОБЪЯВЛЕНИЕ ТИПОВ
  Type ИмяТипа=ОписаниеТипа;
  СОСТАВНОЙ ОПЕРАТОР
  Begin Оператор1;… ОператорN; end;
  ОБЪЯВЛЕНИЕ ПРОЦЕДУРЫ
  Procedure ИмяПроцедуры ([ФормальныеПарам]);
  

• 8 слайд

  КРОССВОРД
  

• 9 слайд

  Операции с элементами этого типа данных приближенные, точность результата определяется путем округления.
  Диапазон возможных значений целого типа данных зависит от внутреннего представления числа. В каких единицах измеряется внутреннее представление числа?
  Как называется операция упорядочивания элементов массива?
  Как называется функция, которая увеличивает значение элемента на 1 или на i (записывается inc(x,[i]))?
  Этот тип данных может принимать одно из двух истинностных значений: true или false.
  Значениями этого типа являются элементы конечного и упорядоченного множества символов, значение представляет из себя символ, заключенный в кавычки.
  

• 10 слайд

  В Pascal определены два типа данных для работы с текстом:
  Char – литерный или
  символьный;
  
  
  String – строковый или
  строка.
  

• 11 слайд

  Символьный тип
  

• 12 слайд

  Для данных символьного типа определены
  стандартные функции
  
  Pred(ch) - предыдущий символ; Pred(‘Б’)=‘А’
  Succ(ch) – следующий символ; Succ(‘Г’)=‘Д’
  Ord(ch) – код заданного символа ch в таблице символов ; Ord(‘А’)=65
  Chr(x) – значение символа по его коду;
  Chr(128)=‘Б’
  Upcase(ch) – преобразование строчной буквы в заглавную, только для латинского алфавита
  Upcase(‘v’)=‘V’
  

• 13 слайд

  Над данными символьного типа определены операции отношения
  = <> ≥ ≤ > <
  ‘A’=‘a’
  ‘n’<>’N’
  ‘%’>‘L’
  ‘л’>=‘b’
  ‘v’<’1’
  ‘b’<=‘1’
  False
  True
  False
  False
  True
  False
  

• 14 слайд

  Строковый тип данных в
  Turbo Pascal
  

• 15 слайд

  Строка – последовательность символов, представляющая собой особую форму одномерного массива данных символьного типа
  Строка символов имеет две разновидности длины:
  
  -общая длина строки, которая определяет величину памяти, выделяемую строке при описании;
  -текущая длина строки (всегда  общей длины) количество смысловых символов строки в данный момент времени.
  max длина строки = 255 символов
  Для строки из n символов в памяти отводится n+1 байт:
  n байт – для хранения символов строки
  1 байт (нулевой) - для значения текущей длины строки
  В программе st – переменная строкового типа длиной 12
  Переменная st=‘Программа’ хранится в памяти следующим образом
  

• 16 слайд

  Переменная строкового типа String может быть определена
  type
  ctroka =string [26];
  var st1,st2: ctroka;
  
  Var
  st1,st2: string [26];
  или
  var st: string;
  Через описание типа
  
  type
  ИмяТипа =string [max длина строки];
  var
  Идент1,…: ИмяТипа;
  Через объявление переменных
  
  var
  Идент1,…: string [max длина строки];
  или
  var
  Идент1,…: string;
  

• 17 слайд

  2) Строка- это совокупность символов (элементов типа Char), которые при обработке доступны каждый в отдельности. Доступ к отдельному элементу строки аналогичен доступу к отдельному элементу массива.
  Slovo[1]:=‘A’- первому символу переменной Slovo присвоить значение – А.
  С отдельным элементом строки возможно проделывать все те операции, что и с переменными типа Char.
  2 способа обработки строк:
  1) Как единый объект
  
  slovo:=‘информатика’;
  slovo:=‘школа’+’_’+’№178’
  stroka:= slovo1 + slovo2;
  

• 18 слайд

  Операции над строками
  Операция сцепления (+)
  A:=’Учимся’; B:=‘УКСИВТ’; С:=A+’ в ’+B+’е’;
  2. Операции отношения (сравнения двух строк - лексикографичекое) =,<, >,<>,<=,>=
  Сравнение строк производится слева направо посимвольно до первого несовпадающего символа, большей считается та строка, в которой первый несовпадающий символ имеет больший код в таблице кодировки.
  Если строки имеют различную длину, но в общей части символы совпадают, считается, что короткая строка меньше.
  Строки равны, если они имеют равную длину и соответствующие символы совпадают.
  Сравнение строк применяется для:
  сортировки массивов в алфавитном порядке;
  быстрого поиска данных в отсортированном массиве;
  слияния двух отсортированных массивов.
  ‘Иванов’ ‘Иванова’
  ‘Моряк’ ‘Море’
  ‘ОНА’ ‘она’
  <
  >
  <
  

• 19 слайд

  Функции для работы со строками
  Pos(st1, st) - обнаруживает первую позицию
  подстроки st1 в строке st
  Сopy(st, poz, n) – выделяет из строки st,
  начиная с позиции poz,
  подстроку длиной n символов
  st= ‘Программисты–народ удивительный,современный и умный народ’ poz= 20 n=12
  st1=‘народ’, st= ‘Программисты–народ удивительный,
  современный и умный народ’
  Pos(st1,st)=
  14
  Сopy(st, poz, n) =
  ‘удивительный’
  

• 20 слайд

  Length(st) – вычисляет текущую длину строки st
  length(st)=ord(st[0])
  Concat (st1,st2,…,stn) – сцепление строк
  st1, st2,…,stn
  st= ‘Народ чудесный–программисты’
  st1=‘Народ чудесный’; st2=‘ программисты’
  Length(st) =
  27
  Concat (st1,st2)=
  ‘Народ чудесный программисты’
  

• 21 слайд

  Пример использования функции length
  
  Program p2;
  var N: integer; wor: string;
  begin
  wor:=‘информатика’;
  n:=length(wor);
  write (N);
  end.
  Пример использования функции pos
  
  program p1;
  var wor, w: string; N: integer;
  begin
  wor:=‘электрификация’;
  writeln (‘введите фрагмент для поиска’);
  readln (w);
  N:= pos (w, wor);
  if N < > 0 then writeln (‘позиция =’,N);
  else writeln (‘такого фрагмента нет’);
  end.
  Пример использования функции copy
  
  program p3;
  var wor; w1, w2, w3: string;
  begin
  word:=‘картографирование’;
  w1:=copy (wor, 6,4);
  writeln (w1);
  w2:=copy (wor, 2,3);
  writeln (w2);
  w3:=copy (wor, 11, 3);
  writeln (w3);
  end.
  граф
  арт
  ров
  

• 22 слайд

  Процедуры для работы со строками
  Insert (st1, st, poz) – вставляет строку st1 в
  строку st, начиная с позиции poz.
  st=‘Программиста не корми’; st1=‘хлебом ’; poz=14
  st=‘Он компьютер ваш спасёт от вируса’; poz=14;n=4
  Delete (st, poz, n) – удаляет n символов из строки st, начиная с позиции poz.
  st=‘Программиста хлебомне корми’
  st=‘Он компьютер спасёт от вируса’
  

• 23 слайд

  Пример использования
  insert и delete
  
  Program P4;
  var st, st1: string;
  begin
  st:=‘компьютеризация’;
  writeln (st);
  delete (st,1,7);
  writeln (st);
  delete (st,3,2);
  writeln (st);
  word1:=‘г’;
  insert (st1, st, 1);
  writeln (st);
  word1:=‘не’;
  insert (st1, st, 3);
  writeln (st);
  end.
  еризация
  ерация
  герация
  генерация
  
  

• 24 слайд

  str(number,st) – преобразует числовое значение
  величины number в строку st
  val (st,number,code) – преобразует значение st в величину целого или вещественного типа и помещает результат в number.
  code =0 –если нет ошибки преобразования,
  code=№ позиции первого ошибочного символа
  num=5.28
  s1=5$28
  s2=5.28
  

• 25 слайд

  Пример использования Val и Str
  program p5;
  var chislo,kod: integer;
  stroka: string;
  begin
  writeln ('Задайте число ');
  readln(chislo);
  str (chislo,Stroka);
  writeln ('Строковое представление числа- ', stroka);
  writeln ('stroka+stroka= ', stroka+stroka);
  readln ;
  val( stroka, chislo, kod);
  if kod <> 0 then
  writeln ('Ошибка ввода ')
  else writeln ('Числовое значение ',chislo, ' chislo+chislo= ', chislo+chislo);
  readln;
  end.
  

• 26 слайд

  Строка – это . . .
  Чтобы обратиться к определенной букве
  в строке, надо . . .
  Для добавления и удаления подстроки
  используются процедуры . . .
  Как преобразовать число в строку?
  А наоборот?
  Как скопировать фрагмент строки?
  

• 27 слайд

  Результатом вычисления функции
  Copy('программирование',4,5) будет слово
  Результат работы программы:
  будет слово:
  мим озадаченный
  мимозадаченный
  мимоза
  озадаченный мим
  озадаченныймим
  миров
  грамм
  программ
  программа
  грамми
  

• 28 слайд

  Program DemoUpcase;
  Var
    Word : string;
    i : Byte;
  Begin
    Word := 'фирма Microsoft';
    for i := 1 to Length (Word) do
      Word[i] := UpCase (Word[i]);
      writeln(Word);
  End.
  Результат работы программы:
  'Фирма MICROSOFT'
  'ФИРМА MICROSOFT'
  'фирма Microsoft
  'фирма MICROSOFT'
  'фирма microsoft
  

• 29 слайд

  Вызывая функцию Copy не нужно указывать:
  учитываются все входящие в нее символы;
  учитываются все входящие в нее символы, кроме пробелов;
  учитываются не все входящие в нее символы;
  учитываются все входящие в нее символы, исключая служебные символы;
  учитываются все входящие в нее символы, имеющиеся на клавиатуре.
  
  имя строки, из которой должен извлекаться копируемый фрагмент;
  позицию в строке, начиная с которой будет копироваться фрагмент;
  число копируемых символов;
  имя строки, в которую копируется данный фрагмент;
  имя функции.
  При подсчете фактической длины строки:
  

• 30 слайд

  C помощью функции Pos можно осуществить поиск некоторого фрагмента в строке. Если заданный фрагмент в строке присутствует, то функция :
  возвращает количество фрагментов в строке;
  возвращает нуль;
  вырезает найденный фрагмент из строки;
  заменяет найденный фрагмент на введенный ранее;
  возвращает номер позиции, с которой начинается фрагмент.
  
  

• 31 слайд

  Решение задач
  

• 32 слайд

  Получить из слова "математика" слово
  "тематика".
  Получить из слова "Позитроника" слово
  "трон".
  Получить из слова "абракадабра" - "академик".
  

• 33 слайд

  st= ‘Программисты народ удивительный, современный и умный народ’
  Дан текст. Слова в тексте разделены пробелом.
  Посчитать количество слов в тексте.
  

• 34 слайд

  Рапаков Г.Г., Ржеуцкая С.Ю.
  «Программирование на языке Pascal», стр. 257-274
  Домашнее задание
  Составить блок-схему, написать программу
  
  Дана строка символов до точки. Слова отделяются друг друг от друга пробелом. Определить, сколько слов содержат ровно 3 буквы "е".
  Дан текст. Найти самое короткое и самое длинное слова.
  Дан текст. Посчитать количество слов, заканчивающихся на заданную букву.
  В тексте содержащем несколько предложений найти все вхождения заданного слова и распечатать все включающие его предложения. Принять, что каждое предложение заканчивается точкой.*