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

кратные 3 и 5 на ноль. Использовать функцию.
Система тестов:

и наименьший элементы массива. Использовать процедуру.
Система тестов:

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

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

цикла 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 ИмяПроцедуры ([ФормальныеПарам]);

округления.

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

Как называется операция упорядочивания элементов массива?

Как называется функция, которая увеличивает значение элемента на 1 или на i (записывается inc(x,[i]))?

Этот тип данных может принимать одно из двух истинностных значений: true или false.

Значениями этого типа являются элементы конечного и упорядоченного множества символов, значение представляет из себя символ, заключенный в кавычки.

– литерный или
символьный;


String – строковый или
строка.

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

<

‘A’=‘a’

‘n’<>’N’

‘%’>‘L’

‘л’>=‘b’

‘v’<’1’

‘b’<=‘1’

False

True

False

False

True

False

символьного типа

Строка символов имеет две разновидности длины:

-общая длина строки, которая определяет величину памяти, выделяемую строке при описании;
-текущая длина строки (всегда ≤ общей длины) количество смысловых символов строки в данный момент времени.
max длина строки = 255 символов

Для строки из n символов в памяти отводится n+1 байт:
n байт – для хранения символов строки
1 байт (нулевой) - для значения текущей длины строки

В программе st – переменная строкового типа длиной 12
Переменная st=‘Программа’ хранится в памяти следующим образом

string [26];
или
var st: string;

Через описание типа

type
ИмяТипа =string [max длина строки];
var
Идент1,…: ИмяТипа;

Через объявление переменных

var
Идент1,…: string [max длина строки];
или
var
Идент1,…: string;

доступны каждый в отдельности. Доступ к отдельному элементу строки аналогичен доступу к отдельному элементу массива.
Slovo[1]:=‘A’- первому символу переменной Slovo присвоить значение – А.
С отдельным элементом строки возможно проделывать все те операции, что и с переменными типа Char.

2 способа обработки строк:

1) Как единый объект

slovo:=‘информатика’; slovo:=‘школа’+’_’+’№178’ stroka:= slovo1 + slovo2;

(сравнения двух строк - лексикографичекое) =,<, >,<>,<=,>=

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

Сравнение строк применяется для:
сортировки массивов в алфавитном порядке;
быстрого поиска данных в отсортированном массиве;
слияния двух отсортированных массивов.

‘Иванов’ ‘Иванова’

‘Моряк’ ‘Море’

‘ОНА’ ‘она’

<

>

<

подстроки st1 в строке st

Сopy(st, poz, n) – выделяет из строки st,
начиная с позиции poz,
подстроку длиной n символов

st= ‘Программисты–народ удивительный, современный и умный народ’ poz= 20 n=12

st1=‘народ’, st= ‘Программисты–народ удивительный,
современный и умный народ’

Pos(st1,st)=

14

Сopy(st, poz, n) =

‘удивительный’

st2,…,stn

st= ‘Народ чудесный–программисты’

st1=‘Народ чудесный’; st2=‘ программисты’

Length(st) =

27

Concat (st1,st2)=

‘Народ чудесный программисты’

функции 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.

граф
арт
ров

st1 в
строку st, начиная с позиции poz.

st=‘Программиста не корми’; st1=‘хлебом ’; poz=14

st=‘Он компьютер ваш спасёт от вируса’; poz=14;n=4

Delete (st, poz, n) – удаляет n символов из строки st, начиная с позиции poz.

st=‘Программиста хлебомне корми’

st=‘Он компьютер спасёт от вируса’

(st); delete (st,3,2); writeln (st); word1:=‘г’; insert (st1, st, 1); writeln (st); word1:=‘не’; insert (st1, st, 3); writeln (st); end.

еризация
ерация
герация
генерация

st

val (st,number,code) – преобразует значение st в величину целого или вещественного типа и помещает результат в number.
code =0 –если нет ошибки преобразования,
code=№ позиции первого ошибочного символа

num=5.28

s1=5$28
s2=5.28

('Задайте число '); 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.

надо . . .

Для добавления и удаления подстроки
используются процедуры . . .

Как преобразовать число в строку?
А наоборот?

Как скопировать фрагмент строки?

мимозадаченный
мимоза
озадаченный мим
озадаченныймим

миров
грамм
программ
программа
грамми

Microsoft';   for i := 1 to Length (Word) do     Word[i] := UpCase (Word[i]);     writeln(Word);
End.

Результат работы программы:

'Фирма MICROSOFT'
'ФИРМА MICROSOFT'
'фирма Microsoft
'фирма MICROSOFT'
'фирма microsoft

символы;
учитываются все входящие в нее символы, кроме пробелов;
учитываются не все входящие в нее символы;
учитываются все входящие в нее символы, исключая служебные символы;
учитываются все входящие в нее символы, имеющиеся на клавиатуре.

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

При подсчете фактической длины строки:

Если заданный фрагмент в строке присутствует, то функция :

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

"трон".

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

тексте разделены пробелом.
Посчитать количество слов в тексте.

блок-схему, написать программу

Дана строка символов до точки. Слова отделяются друг друг от друга пробелом. Определить, сколько слов содержат ровно 3 буквы "е".
Дан текст. Найти самое короткое и самое длинное слова.
Дан текст. Посчитать количество слов, заканчивающихся на заданную букву.
В тексте содержащем несколько предложений найти все вхождения заданного слова и распечатать все включающие его предложения. Принять, что каждое предложение заканчивается точкой.*