Понедельник, 03.02.2025
Pascal 4 All
[ · Новые сообщения · Участники · Правила форума · Поиск · RSS ]

 

  • Страница 1 из 1
  • 1
Модератор форума: Seqular, Pavel  

задача на файлы
resisterДата: Понедельник, 16.03.2009, 22:41 | Сообщение # 1
Старый знакомый
Группа: Пользователи
Сообщений: 25
Репутация: 0
Замечания: 0%
Статус: Offline
В текстовом файле построчно записаны предложения.Записать во второй текстовый файл номера предложений, которые заканчиваются многоточием.
Прошу помочь с процедурой нахождения многоточия в конце предложения.


:shubizsetisforuma:
 
SeqularДата: Вторник, 17.03.2009, 14:05 | Сообщение # 2
Хранитель
Группа: Администраторы
Сообщений: 859
Репутация: 35
Статус: Offline
Ну например считали предложение в строку s.
If (Pos('...',s)) then - в строке есть многоточие.
If (Pos('...',s) = length(s)-3) then - многоточие в конце строки...
Поэкспериментируй с этим


Поддерживаю также проект сообщество молодых сисадминов
 
  • Страница 1 из 1
  • 1
Поиск:

Copyright MyCorp © 2025
Используются технологии uCoz
javascript:;" rel="nofollow" onclick="loginPopupForm(); return false;