|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
21.12.2009, 21:07 | #1 |
Пользователь
Регистрация: 12.12.2009
Сообщений: 84
|
Помогите понять почему прога виснет
Помоги понять почему прога при введении в строку более одного слова зацикливается........
Код:
|
21.12.2009, 21:09 | #2 |
Старожил
Регистрация: 28.01.2009
Сообщений: 21,000
|
Код:
Хорошо поставленный вопрос это уже половина ответа. | Каков вопрос, таков ответ.
Программа делает то что написал программист, а не то что он хотел. Функции/утилиты ждут в параметрах то что им надо, а не то что вы хотите. |
21.12.2009, 21:40 | #3 |
Участник клуба
Регистрация: 03.12.2009
Сообщений: 1,013
|
*модератору на удаление*
Последний раз редактировалось Базиля; 21.12.2009 в 21:42. |
21.12.2009, 22:01 | #4 |
Пользователь
Регистрация: 12.12.2009
Сообщений: 84
|
Она даж ещё работает только с 1 словом.....!!!!!!
|
21.12.2009, 22:54 | #5 |
Пользователь
Регистрация: 12.12.2009
Сообщений: 84
|
Как это можно исправить?? если я убираю 1 ничего не меняется
|
21.12.2009, 22:57 | #6 |
Старожил
Регистрация: 20.04.2008
Сообщений: 5,528
|
while i<=length(s) do
begin i:=1; while (pos(s[i],znaki)=0) and (i<=length(s))do begin //s1:=' '; s1:= s1 + s[i]; Inc(i); end; write(Perestanovka(s1)); end; while (pos(s[i],znaki)<>0) and (i<=length(s))do write(s[i]); Inc(i); //end; Readln; Readln; end.
программа — запись алгоритма на языке понятном транслятору
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Плииз!!! помогите! Не могу понять почему не работает! (Паскаль) | Викуська_ | Помощь студентам | 5 | 21.04.2009 20:37 |
Не могу понять почему не идет сортировка файла, помогите пожалуйста | Taisja | Помощь студентам | 2 | 15.06.2008 20:37 |
Не могу понять почему вылетает 3 процедурка, помогите | Taisja | Помощь студентам | 2 | 04.06.2008 21:28 |