Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 11.12.2013, 12:25   #1
Un1q
Пользователь
 
Регистрация: 21.11.2013
Сообщений: 11
По умолчанию Строки. Дана строка символов,среди которых есть двоеточие ( : ). Определить сколько символов ему предшествуют.

Строки. Дана строка символов,среди которых есть двоеточие ( : ). Определить сколько символов ему предшествуют.
Un1q вне форума Ответить с цитированием
Старый 11.12.2013, 12:31   #2
ZX Spectrum-128
Участник клуба
 
Регистрация: 05.11.2013
Сообщений: 1,602
По умолчанию

Код:
K:=pos(':',s);
N:=length(s)-k;
ZX Spectrum-128 вне форума Ответить с цитированием
Старый 11.12.2013, 14:52   #3
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,238
По умолчанию

не. ещё проще
Код:
N := Pos(':',s)-1;
Serge_Bliznykov вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Дана строка символов. Подсчитать, сколько различных символов встречаются в ней. Вывести их на экран Алена_=))) Microsoft Office Word 1 17.06.2012 21:04
Дана строка. В строке удалить символ двоеточие и подсчитать количество удаленных символов.в делфи _Алексей_ Помощь студентам 3 29.04.2012 15:37
Дана строка. В строке удалить символ двоеточие ":" и подсчитать количество удаленных символов.в делфи _Алексей_ Помощь студентам 6 20.04.2012 16:12
верно ли, что среди символов данного текста есть n подряд идущих символов, Yuliya-Nik Помощь студентам 0 06.10.2010 23:44
Дана строка символов до точки. Определить, сколько слов содержат ровно три буквы "К". Evidence Паскаль, Turbo Pascal, PascalABC.NET 0 01.06.2009 20:40