|
|
|
Регистрация Восстановить пароль |
|||||||
| Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
||||
 |
|
|
Опции темы | Поиск в этой теме |
05.05.2009, 23:35
|
#1 |
|
Регистрация: 05.05.2009
Сообщений: 3
|
Помогите дописать БД
Вот моя БД. Она почти готовая но есть пару багов. База должна поддерживать контроль ошибок (тоесть если вводиш неверное условие должно появляться сообщение о ошибке) в процедурах меню Поиск (vodiuu, buss, marshrytt, parkk) я попытался написать через цыкл но сообщение о ошибке выбрасывает в любом случае - как это исправить?
И такой же цыкл нужно зделать для файлов (тоесть если неправильно вводиш имя файла тоже должно вискакивать сообщение о ошибке) |
|
|
|
05.05.2009, 23:47
|
#2 |
|
Регистрация: 05.05.2009
Сообщений: 3
|
|
|
|
|
|
30.05.2009, 22:14
|
#3 |
|
Новичок
Джуниор
Регистрация: 30.05.2009
Сообщений: 1
|
write('cena:');
readln(cena); while cena<=0 do begin writeln('ne verno, vvedite snova (cena>0)'); readln(cena); end; так пока не введёшь нормальное значение, просит ввести снова.. |
|
|
|
|
Похожие темы
|
||||
| Тема | Автор | Раздел | Ответов | Последнее сообщение |
| Помогите дописать курсовой | knopixx7 | Помощь студентам | 0 | 02.05.2009 22:52 |
| Помогите дописать программу | cL1zMa | Паскаль, Turbo Pascal, PascalABC.NET | 2 | 06.06.2008 14:40 |
| Помогите дописать | ShnapS | Паскаль, Turbo Pascal, PascalABC.NET | 4 | 28.05.2008 21:08 |
| Помогите дописать | Klyan | Общие вопросы C/C++ | 8 | 22.06.2007 01:55 |
| Помогите дописать компонент | Mickle | Компоненты Delphi | 0 | 28.05.2007 19:41 |
