 Вопрос новичка. |
Правила раздела!
1. Заголовок или название темы должно быть информативным !
2. Все тексты фрагментов программ должны помещаться в теги [code] ... [/code] или [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ" и используйте ПОИСК !
4. НЕ используйте форум для личного общения!
5. Самое главное - это раздел теоретический, т.е. никаких задач и программ (за исключением небольших фрагментов) - для этого есть отдельный раздел!
| Сибиряк 2 |
 19.08.2007 4:17
Сообщение
#1
|
|
Группа: Пользователи Сообщений: 3 Пол: Мужской Реальное имя: Сергей Репутация:  0   |
Как закончить код программы чтоб после ее выполнения и нажатия ентер она возвращалась к первоначальному состоянию. Например var a, b, c: integer;
write('a='); readln(a); write('b='); readln(b); c:= a+b; write('c') end. Как после вывода ответа и нажатия ентер вернуться назад к вводу первого числа чтоб решить другой аналогичный пример? Спасибо. Сообщение отредактировано: Сибиряк 2 - 19.08.2007 4:21 |
   |
 
|
Сообщений в этой теме
Сибиряк 2 Вопрос новичка. 19.08.2007 4:17
Bokul Использовать условные циклы repeat...until (услови... 19.08.2007 4:45
Сибиряк 2 Я примерно понимаю это. Но если не трудно как это ... 19.08.2007 6:37 volvo uses crt;
var a, b, c: integer;
begin
repeat
... 19.08.2007 8:08 Сибиряк 2 Ясно спасибо. 20.08.2007 21:40 spill А еще можно так:
uses crt;
var a, b, c: integ... 29.09.2007 12:23 volvo А еще НУЖНО проверять то, что ты пишешь! :mad... 29.09.2007 13:08 Айра uses crt;
var a, b, c: integer; !
...
If a ... 29.09.2007 13:09 daZe1 Та да.... может a - Char??? :nea: 1.11.2007 13:17 2ral
writeln('Повторить? [y/n]');
ReadLn (A... 10.11.2007 23:37  |
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0
|
Текстовая версия | 1.09.2025 12:48 |