|
|
| Автор |
Сообщение |
Калем

Зарегистрирован: 28.12.2006 Сообщения: 60 Откуда: мурманская область
|
Добавлено: Вс Янв 28, 2007 10:02 pm Заголовок сообщения: нужна помощь |
|
|
пишу на паскале(турбо паскаль)
после компиляции запускаю программку ,
ввожу значения ,нажимаю enter
дальше в одно мгновение выводит в окне правильный ответ,и окно закрывается . чего делать? как быть?
я только начал изучать програмирование ,вот сама прога
program xyx;
var a,b,c,d,e:integer;
begin
readln(a,b,c);
d:=a*a+b*b+c;
e:=d+a+b+c;
write(e)
end.
))) |
|
| Вернуться к началу |
|
 |
|
|
 |
Dark

Зарегистрирован: 28.12.2006 Сообщения: 35
|
|
| Вернуться к началу |
|
 |
Калем

Зарегистрирован: 28.12.2006 Сообщения: 60 Откуда: мурманская область
|
Добавлено: Пн Янв 29, 2007 1:48 pm Заголовок сообщения: Re: нужна помощь |
|
|
| Dark писал(а): | Допиши перед end. такое:
repeat until keypressed; |
пишет что keypressed неизвестный идентификатор |
|
| Вернуться к началу |
|
 |
Dark

Зарегистрирован: 28.12.2006 Сообщения: 35
|
|
| Вернуться к началу |
|
 |
.vp

Зарегистрирован: 19.02.2007 Сообщения: 5
|
Добавлено: Пн Фев 19, 2007 2:07 pm Заголовок сообщения: |
|
|
проще, друзья
| Код: | program xyx;
uses crt;
var a,b,c,d,e:integer;
begin
readln(a,b,c);
d:=a*a+b*b+c;
e:=d+a+b+c;
write(e)
readkey;
end. |
обращайся *THUMBS UP* _________________ . . мир и любовь, друзья = ) . . . |
|
| Вернуться к началу |
|
 |
|
|
Вы не можете начинать темы Вы не можете отвечать на сообщения Вы не можете редактировать свои сообщения Вы не можете удалять свои сообщения Вы не можете голосовать в опросах
|
alexisBlue v1.2 // Theme Created By: Andrew Charron // Icons in Part By: Travis Carden
|
|
|
|
|