Помогите написать функцию(Паскаль) - Помощь студентам

Паскалька^^ · 15.11.2009, 21:52

Требуется написать функцию, которая будет выделять из строки a подстроки длины b, начиная с 1го символа, a>b, a,b<20 и заносить каждую новую подстроку в массив.

LeBron · 15.11.2009, 22:44

Все уже сделано за Вас.

Код:

for i:=1 to l1-l+1 do ar[i]:=copy(st1,i,l);

Паскалька^^ · 15.11.2009, 22:47

LeBron, благодарю)

15.11.2009, 21:52	#1
Паскалька^^ Пользователь Регистрация: 25.11.2008 Сообщений: 53	Помогите написать функцию(Паскаль) Требуется написать функцию, которая будет выделять из строки a подстроки длины b, начиная с 1го символа, a>b, a,b<20 и заносить каждую новую подстроку в массив.

15.11.2009, 22:44	#2
LeBron Форумчанин Регистрация: 10.10.2009 Сообщений: 680	Все уже сделано за Вас. Код: `for i:=1 to l1-l+1 do ar[i]:=copy(st1,i,l);`

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
помогите написать функцию-член на Си++	aka_faith	Помощь студентам	0	14.06.2009 17:36
помогите написать функцию	SkCr	Microsoft Office Excel	5	14.03.2009 23:47
помогите написать функцию	SkCr	Помощь студентам	2	14.03.2009 21:24
Помогите написать функцию	Черничный	Общие вопросы Delphi	4	13.08.2008 07:02

15.11.2009, 22:47	#3
Паскалька^^ Пользователь Регистрация: 25.11.2008 Сообщений: 53	LeBron, благодарю)