Функции LENGTH и CONCAT.

Функция Length возвращает в качестве значения длину строки. Например, если в строковой переменной «stroka» записано слово «Pascal», то Length(stroka) будет равно 6. Эта операция аналогична операции Ord(stroka[0]), которую мы разбирали в 1-м уроке. ...

Div, Mod, сложение, вычитание в Pascal.

Помимо операций умножения и сложения, над целочисленными переменными производятся операции Div (операция целочисленного деления), Mod (вычисление остатка от целочисленного деления), операция вычитания «-».

Функции Copy, Pos, процедуры Delete, Insert.

Функция Copy позволяет копировать из строки часть символов. Функция имеет 3 параметра. Copy (st, index, count). St-строка из которой копируют, Index-номер символа, с которого начинается копирование, Count-количество символов, которое будет ...

Циклы и массивы

Массив строк типа STRING.

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

Инициализация одномерного массива.

Отличительной особенностью Паскаля от большинства процедурных языков является то, что все переменные должны быть инициализированы. То есть в разделе VAR переменным отводится место, а начальное ...

Функция Copy позволяет копировать из строки часть символов. Функция имеет 3 параметра. Copy (st, index, count). St-строка из которой копируют, Index-номер символа, с которого начинается копирование, Count-количество символов, которое будет скопировано.
Процедура Delete удаляет часть символов из строки. Процедура имеет 3 параметра. Delete (st, index, count). St-строка, из которой будут удалены символы, Index-номер символа, с которого начинается удаление, Count-количество символов, подлежащих удалению.
Процедура Insert позволяет вставлять символы в строку. Процедура имеет 3 параметра. Insert (subst, st, index). Subst-подстрока, которую необходимо вставить, St-строка, в которую вставляется подстрока, Index-номер элемента, с которого начинается вставка.
Функция Pos отыскивает в строке первое вхождение подстроки и возвращает в качестве значения номер элемента, с которого начинается вхождение. Функция имеет 2 параметра. Pos (subst, st). Subst-подстрока, St-строка.

Использование функции COPY, процедуры DELETE.


program string5;
uses crt;
var stroka1,stroka2:string;
begin
clrscr;
stroka1:='Programmirovanie ';
stroka2:=copy(stroka1,3,10);
writeln(stroka2);
delete(stroka1,3,10);
writeln(stroka1);
readln
end.

Строка №6. Записываем в переменную «stroka1» слово «Programmirovanie».

Строка №7. В переменную «stroka2» записываем значение функции Copy. В результате работы этой функции из переменной «stroka1» (слова «Programmirovanie») будет скопировано 10 символов, начиная с 3-го символа.

Строка №9. Процедура Delete удалит из слова «Programmirovanie» 10 символов, начиная с 3-го.

funkciya COPY, procedura DELETE

funkciya COPY, procedura DELETE.


Использование функции POS, процедуры INSERT.



program string6;
uses crt;
var stroka1,stroka2:string;
nomer:integer;
begin
clrscr;
stroka1:='Programmirovanie ';
stroka2:='PASCAL';
insert(stroka2,stroka1,8);
writeln(stroka1);
nomer:=pos('S',stroka1);
writeln(nomer);
readln
end.


Строка №9. Процедура Insert позволяет вставить в строку другую строку. В нашем случае в слово «Programmirovanie» вставляется слово «PASCAL», начиная с 8-го символа.
Строка №11. В переменную «nomer» записывается значение функции Pos. Переменная «stroka1» содержит слово «ProgramPASCALmirovanie». Буква «S» является 10-й по счету. Соответственно в переменную «nomer» будет записано число 10.

funkciya POS, procedura INSERT

funkciya POS, procedura INSERT.


Предыдущая статья : Функции LENGTH и CONCAT.

Оглавление : Уроки Паскаль. Строки.

Следующая статья : Процедуры STR и VAL.


Комментарии  

 
+11 # Saruman 02.01.2013 15:57
У меня вопрос. Как узнать, какой по счёту нужный тебе символ, если он встречается несколько раз?
Ответить
 
 
+3 # 1640max 06.02.2013 12:27
Я не профи, но думаю, что надо заменять найденный символ на иной и продолжить поиск
Ответить
 
 
+5 # Антон 25.02.2013 14:30
Вариант!
Ответить
 
 
+13 # шваха 10.04.2014 16:05
Как и в массиве - просто в цикле перебираешь всю строку и сравниваешь с нужным тебе символом. Если хочешь все позиции данного символа "выявить", то в этом же цикле при равенстве символов в массив закидываешь номер этого символа.(если я правильно понял вопрос)
Ответить
 
 
0 # Залупинко 15.01.2018 15:03
1 попавшийся подходящий символ (Если ты про Pos('Нужный элемент',строка ))
Ответить
 
 
-8 # qwerty 13.09.2014 13:43
:oops:
Ответить
 
 
-2 # qqqqqq 12.11.2014 10:27
Хорошо объяснили. Спасибо 8)
Ответить
 
 
+1 # Сергей 06.01.2015 12:04
Спасибо
Ответить
 
 
-3 # алексей 06.10.2016 12:44
скажите, а как удалить последний символ из строки, если мы заранее не знаем количество символов в ней?
Ответить
 
 
-9 # Мартин 07.10.2016 13:04
Попробуй For i:=1 to 2 down to
Ответить
 
 
0 # N 13.01.2017 18:41
length(a) - функция, результат которой - натуральное число, количество ситволов в строке a
Ответить
 
 
-6 # ljklok 15.10.2016 05:11
:-) ;-)
Ответить
 
 
-7 # bigben 17.10.2016 07:09
:lol: :-) ;-) :-| :-* :cry: :o :-? :zzz :zzz :P :P :sigh: :D
Ответить
 
 
-1 # Мари 13.12.2016 20:10
А в Vba какая есть функция ,которая такая же , как Copy в Паскале ?
Ответить
 
 
-1 # Павел Дмитриевич 17.12.2016 22:55
С функцией POS не получается...
Вылетает ошибка: "Ожидалась переменная"
Ответить
 
 
-1 # Dj 14.03.2017 16:58
Даны 2 строки вывести все символы которые есть в s1 и которых нет в s2
Ответить
 
 
-1 # aijamal 10.04.2017 12:28
Составить и записать программу используя "Insert"
Ответить
 
 
0 # Jody 04.12.2017 17:36
The CBOE presents two binary choices for trade.

Here is my webpage: Binary options trading
Strategy: http://ge.tt/5egAcan2
Ответить
 
 
0 # Bette 17.12.2017 11:48
MyLab Box really is non-public and discreet.

Feel free to visit my blog; my lab box coupon code: https://www.ghananewsnetwork.org/we-need-evidence-to-prosecute-corrupt-officials-nana-addo/
Ответить
 
 
0 # Cristine 20.12.2017 11:19
MyLab Field assessments are a hundred% legit.



Visit my web site mylab box reviews: http://alatestmlp-0.7ba.info/out.php?url=http://milanoproperties.com.ng/ten-incredible-mylab-box-reviews-examples/
Ответить
 
 
0 # Shawn 02.01.2018 20:53
The price of an individual share can be any value.

My website ... how to register a business uk (Cheryle: https://renaissancefic.tumblr.com/)
Ответить
 
 
0 # Branden 08.01.2018 18:02
Hello, i think that i saw you visited my web
site thus i came to “return the favor”.I'm trying to find things to enhance my web site!I suppose its ok to use some of your ideas!!



Feel free to surf to my webpage ... specadieta.com: http://specadieta.com
Ответить
 
 
0 # Lieselotte 08.01.2018 22:59
Ecoslim is cheaper and even more effective.

my homepage ... gym Training: https://www.slideshare.net/smartfonbgcom/how-to-get-fit-at-home-with-eco-slim
Ответить
 

Добавить комментарий

Защитный код
Обновить

   ГлавнаяПаскальСтроки в Паскаль