![]() |
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
![]() ![]() |
![]() |
Витёк |
![]()
Сообщение
#1
|
Группа: Пользователи Сообщений: 9 Пол: Мужской Реальное имя: Виктор Репутация: ![]() ![]() ![]() |
Нам задали сделать задачку. Вот условие: А) заменить все (!) знаки на (.)
Б) затем все точки заменить на (...). Первую часть я сделал так: var s:string;
i:integer;
begin
readln(s);
for i:=1 to length(s) do
if s[i] ='!' then s[i]:='.';
writeln(s);
end.
Ну а вот с заменой точки в этой же программе выходит ошибка. Я хотел сделать это также как и с (!), но не получилось. Объясните пожалйста что я не так сделал. |
klem4 |
![]()
Сообщение
#2
|
![]() Perl. Just code it! ![]() ![]() ![]() ![]() ![]() ![]() Группа: Модераторы Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: ![]() ![]() ![]() |
Вот так например:
i := 1;
while (i <= Length(s)) do
if s[i] = '.' then begin
Insert('..', s, i + 1);
inc(i, 3);
end else inc(i);
-------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
volvo |
![]()
Сообщение
#3
|
Гость ![]() |
Цитата Объясните пожалйста что я не так сделал Если бы ты показал, КАК ты сделал вторую часть, мы бы подсказали, где твоя ошибка... А так - телепатически - ты в начале цикла нашел длину строки, и проходишь по ней... Но при добавлении символов в строку ее длина изменяется, а твоя программа об этом не знает, так что For здесь не пойдет явно...Не забывай, конечное значение переменной для For-а не вычисляется на каждой итерации, оно вычисляется ПЕРЕД началом цикла, и сохраняется... |
![]() ![]() |
![]() |
Текстовая версия | 29.07.2025 16:44 |