функция copy str n m что делает

В прошлый раз мы разобрали стандартные процедуры в Pascal, применимые к строковому типу данных. Сегодня я расскажу про функции, которые применяются к этому типу данных.

Первая функция, про которую я сегодня расскажу, — функция определения длины строки Length (s). Принцип этой функции очень прост. В скобочках указывается строка, длину которой нужно найти. Возвращает эта функция одно значение — количество символов из которых состоит строка. Функция Length (s), как и все функции в паскаль возвращает значение.

Пример использования функции Length (s):

Пример простейшей программы на паскаль с использованием функции pos (s1, s2):

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

Следующая функция, применимая к типу String — функция копирования определенной подстроки из строки Copy (s, p, n). S- строка, из которой нужно скопировать, p — позиция, начиная с которой необходимо копировать, n — сколько символов надо скопировать. S — строка, типа string, p, n — целочисленные, то есть типа integer.

Пример решения задачи Паскаль, с использованием функции копирования:

На сегодня урок окончен. В уроках 19 и 20 я подробно рассказал про стандартные функции и процедуры Паскаль, применимые к строковому типу данных.

Источник

Функция Copy

Подпишись на новости, чтобы ничего не пропустить

Функция Copy в Паскале копирует часть строки. Синтаксис:

Второй вариант для динамических массивов:

Функция Copy копирует несколько символов подряд из строки S и возвращает эти символы в виде строки. Первый символ, с которого начинается копирование строки, указан в параметре Index (нумерация символов в строке начинается с единицы слева направо). Количество копируемых символов указано в параметре Count.

Например, вот этот код

str := Copy(‘123456’, 3, 2);

копирует в строку str два символа, начиная с 3-го. То есть после выполнения этого кода в str будет строка ’34’.

Если в параметре Count будет указано значение, превышающее длину строки, то результат будет обрезан. Например, вот этот код

str := Copy(‘123456’, 4, 10);

копирует в строку str три символа ‘456’, хотя мы “заказали” копирование 10 символов.

Если в параметре Index будет указано значение, превышающее длину строки, то функция вернёт пустую строку. Например, вот этот код

str := Copy(‘123456’, 15, 2);

вернёт пустую строку, потому что в строке всего 6 символов, а мы указали в качестве первого копируемого символа число 15.

Для динамических массивов функция возвращает новый динамический массив того же типа, что и указанный в параметре А, и копирует количество элементов Count из старого массива, начиная с элемента, определённого параметром Index.

А теперь пример программы.

Не забудьте подключить модуль SysUtils, чтобы использовать функцию StrToInt (её мы изучим как-нибудь в другой раз, а пока только скажу, что она преобразует строку в число).

Программа простая. Если кто не разобрался, то см. видео выше.

Источник

Работа с символьной информацией в Turbo Pascal 7.0

I. Основные сведения о символьных величинах

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

Познакомимся с основными приемами обработки текста на компьютере.

Строкой символов, или символьной (строковой, текстовой) константой, будем называть последовательность символов, заключенных в апострофах.

Строка символов может состоять из одного или нескольких символов, а также не содержать ни одного символа (пустая строка, или строка нулевой длины). Максимальная длина текстовой строки 255 символов.

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

1. Символьный тип данных (Char).

Описание: идентификатор char, ( var x: char).

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

В Turbo Pascal 7.0 значения для переменных типа char задаются в апострофах: sh := ‘*’; а := ‘3’; summa :=’G’.

2. Строковый тип данных (string).

Как правило, одно целое число или один символ занимают в памяти ЭВМ два байта. В то же время для изображения символа достаточно одного байта. С целью экономии памяти машины при использовании символьных данных в языке Паскаль введено понятие строки. Строкой называется последовательность символов определенной длины. Элементы строки хранятся по два в двух байтах памяти ЭВМ.

Переменные типа string могут быть объявлены следующим образом:

var s1: string[30]; s2: string.

Число 30 означает максимально возможное количество символов строки s1.

II. Стандартные функции для работы с символьными величинами

1. Операция сложения символьных величин.

Операция сложения позволяет строить из двух символьных строк третью, состоящих из символов первой, за которой следуют символы второй. Обозначается эта операция знаком «+».

Описываем строковые переменные.

var s1, s2, s3: string;

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

Строка s3 имеет значение ‘Тише воды, ниже травы’.

2. Длина строки

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

В результате значения целых переменных будут равны: kl=5, k2=21.

3. Копирование

Функция copy(str,n,m) в Turbo Pascal 7.0 – копируют т символов строки str, начиная с n-го символа, при этом исходная строка не меняется. Можно результат этой функции присваивать другой строке или сразу выводить его на экран.

Значения переменной s1=’воз’. А на экране будут выведены следующие строки: воз и 34.

4. Удаление

В Turbo Pascal 7.0 для этого используется процедура Delete(str, n,m), которая вырезает из строки str m символов, начиная с n-го. таким образом сама строка изменяется.

Дан фрагмент программы:

s:=’123456′;
delete(s, 3, 2);
writeln(s);

После выполнения этих операторов из строки будут удалены два символа, начиная с третьего, то есть строка будет такой: s = ‘1256’.

5. Замена (Вставка)

В Turbo Pascal 7.0 это можно сделать, применяя процедуру Insert(s1,s2,n) – вставка строки s1 в строку s2, начиная с п-го символа, при этом первая строка остается такой же, как и была, а вторая получает новое значение.

В результате выполнения данной процедуры строка будет такой s2=’123456′.

6. Числа и строки

Надо заметить, что число 25 и строка 25 – это не одно и то же. Для работы с числами и строками в Turbo Pascal 7.0 применяются две процедуры.

Str(n,s1) – переводит числовое значение n в строковое и присваивает результат строке s1, причем можно переводить как целые числа, так и вещественные.

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

Функция val(s, n, k) – переводит строковое значение в числовое, если данная строка действительно является записью числа (целого или вещественного), то значение k=0, а n – это число, иначе k будет равно номеру символа, в котором встречается первое нарушение записи числа n.

val(‘1234′,n,k) п=1234, k=0;

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

Иногда в программах возникает необходимость по коду определить символ и, наоборот, по символу определить его код. Для этого используют функцию: CHR(x).

Эта функция возвращает символ, соответствующий ASCII-коду числа x.

for i = 0 to 255 do
writeln( i,’ ‘, chr(i));

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

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

Programm prim1;
Var s: char;
Begin
Writeln(‘введите символ с клавиатуры’);
Readln(s);
Writeln(‘код символа ‘,s,’=’,ord(s));
Readln;
End.

В три символьные переменные F, I, O ввести свои фамилию, имя, отчество. Сформировать из этих данных строку S, содержащую ваши фамилию и инициалы.

Program prim2;
Var F, I, O, S : string;
Begin
Writeln(‘введите вашу фамилию’);
Readln(F);
Writeln(‘введите ваше имя’);
Readln(I);
Writeln(‘введите ваше отчество’);
Readln(O);
S:=F+’ ‘+copy(I,1,1)+’.’+copy(O,1,1)+’.’;
Writeln(‘ваши реквизиты: ‘, S);
Readln;
End.

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

Program prim3;
Var s: string;
x, k: integer;
Begin
Writeln(‘введите число’);
Readln(x);
Str( x, s);
k:=length(s);
Writeln(‘в числе ‘,k,’ цифр’);
Readln;
End.

Переменные A и B содержат строки цифр. Найти сумму соответствующих чисел.

Program prim4;
Var A, B: string;
S, x, y, n, k: integer;
Begin
Writeln(‘введите первое число’);
Readln(A);
Writeln(‘введите второе число’);
Readln(B);
Val(A, x, n);
Val(B, y, k);
S:=x+y;
Writeln(‘сумма чисел равна ‘,S);
Readln;
End.

Распечатать заданное слово в одной строке с разрядкой (пробел после каждой буквы).

Program prim5;
Var s, x: string;
i: integer;
Begin
Writeln(‘введите слово’);
Readln(s);
x:=’’;
For i:=1 to length(s) do begin
x;=x+copy(s,i,1)+’ ‘
End;
Writeln(‘получилось слово ‘, x);
Readln;
End.

Составить программу подсчета количества вхождений буквы “а” в заданном тексте.

Program prim6;
Var s: string;
i, k: integer;
Begin
Writeln(‘введите текст’);
Readln(s);
k:=0;
for i:=1 to length(s) do begin
if copy(s, i, 1)=’a’ then k:=k+1
end;
Writeln(‘количество букв “а” в тексте равно ’, k);
Readln;
End.

Определить, какое из двух исходных слов длиннее и насколько.

Var s1, s2: string;
L1, l2: integer;
Begin
Writeln(‘введите первое слово’);
Readln(s1);
Writeln(‘введите второе слово’);
Readln(s2);
l1:=length(s1);
l2:=length(s2);
if l1>l2 then writeln(‘первое слово длиннее второго на ‘,l1-l2,’ символов’)
else
if l1=l2 then writeln(‘слова одинаковой длины’)
else writeln(‘первое слово длиннее второго на ‘,l2-l1,’ символов’);
Readln;
End.

Источник

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

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

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

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

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

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

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

Источник

3 занятие

Тема: Стандартные функции для работы со строками (concat,copy,length, pos,upcase).

Функция Length

Встроенная функция Length (длина) позволяет определить фактическую длину текстовой строки, хранящейся в указанной переменной (а не величину предельного размера строки, установленную при декларации):

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

Функция Upcase

Функция Upcase позволяет преобразовывать символ любой литеры из строчного в прописной. Эта функция рассчитана на обработку отдельного символа. Поэтому для обработки строки символов с помощью этой функции приходится организовывать цикл.

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

Примечание. Русские литеры не могут обрабатываться этой функцией.

Для того, чтобы преобразовать в заглавные строчные буквы русского алфавита, применяют оператор выбора Case:

Функция Copy

Функция Copy позволяет копировать фрагмент некоторой строки из одной переменной в другую. Вызывая эту функцию нужно указать следующие параметры:

Функция Pos

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

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

Функция Concat

Функция Concat (Str1,Str2. StrN) выполняет конкатенацию (или сцепление) строк Str1,Str2. StrN в том порядке, в каком они указаны в списке параметров. Сумма символов всех сцепленных строк не должна превышать 255.

Задачи для самостоятельного решения

Источник