|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
14.09.2013, 16:55 | #1 |
Пользователь
Регистрация: 09.12.2012
Сообщений: 37
|
строки в Lazarus - Найти номер позиции, где находится последняя точка
Здравствуйте, подскажите пожалуйста с задачей: Дана строка текста. Найти номер позиции, где находится последняя точка. что я тут не правильно делаю:
var k,i,nom:integer; begin k:=length(Edit1.Text); for i:=1 to k do begin if Edit1.Text[i]='.' then nom:=i; end; Edit2.Text:=nom; end; |
14.09.2013, 17:09 | #2 |
МегаМодератор
СуперМодератор
Регистрация: 09.11.2010
Сообщений: 7,341
|
А так?
Код:
Пишите язык программирования - это форум программистов, а не экстрасенсов. (<= это подпись )
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Найти номер позиции, где находится последняя точка и отсортировать буквы по алфавиту, расположенные после этой последней точки | SnS | Lazarus, Free Pascal, CodeTyphon | 3 | 14.09.2013 22:12 |
Где находится серийный номер windows xp | kreiver | Windows | 8 | 06.03.2013 09:22 |
как узнать номер ячейки в таблице Ворда, где находится курсор? | Ципихович Эндрю | Microsoft Office Word | 22 | 07.04.2012 13:00 |