Pascal ABC, Помогите, пожалуйста, со строками |
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
Pascal ABC, Помогите, пожалуйста, со строками |
Raigo |
17.05.2012 13:39
Сообщение
#1
|
Группа: Пользователи Сообщений: 2 Пол: Мужской Репутация: 0 |
Помогите пожалуйста. Написать программу, которая каждую встреченную букву "б" заменяет сочетанием "ку"с помощью модулей.
вот короче что получилось модуль1: unit op; interface type str= string; implementation end. --------------------------------- Модуль2: unit obrabotk; interface uses op; procedure vvod(var s:str); function zamena(s:str): string; implementation procedure vvod; begin WriteLn; write('Введите текст: '); readln(s); end; function zamena; var i : integer; sTemp : string; begin sTemp := s; for i:=length(sTemp) downto 1 do if sTemp[i]='б' then begin delete(sTemp,i,1); insert('ку',sTemp,i); end; zamena := sTemp; end; end. ------------------------------------- Модуль3: uses op, obrabotk; var s : str; begin vvod(s); writeln('Òåêñò ', zamena(s)); readln; end. Без понятия че ему надо, пишет "Неизвестный идентификатор s " во втором модуле |
IUnknown |
17.05.2012 18:17
Сообщение
#2
|
a.k.a. volvo877 Группа: Пользователи Сообщений: 1 013 Пол: Мужской Репутация: 627 |
Символы экономишь? Полностью заголовок функции/процедуры пиши - не будет ошибок. То, что можно сокращать таким образом, как у тебя - оно, конечно, хорошо. Но не надо этим злоупотреблять - это приводит к проблемам (везде, кроме Турбо-Паскаля, в котором этот бред с неполным заголовком был придуман). FreePascal, к примеру, тоже выдает ту же ошибку - "Не найден идентификатор S".
|
Raigo |
17.05.2012 18:29
Сообщение
#3
|
Группа: Пользователи Сообщений: 2 Пол: Мужской Репутация: 0 |
Символы экономишь? Полностью заголовок функции/процедуры пиши - не будет ошибок. То, что можно сокращать таким образом, как у тебя - оно, конечно, хорошо. Но не надо этим злоупотреблять - это приводит к проблемам (везде, кроме Турбо-Паскаля, в котором этот бред с неполным заголовком был придуман). FreePascal, к примеру, тоже выдает ту же ошибку - "Не найден идентификатор S". Спасибо, помогло |
Текстовая версия | 18.04.2024 14:49 |