нужна помощь

 
Начать новую тему   Ответить на тему    Список форумов Мир Windows Vista -> Программирование
 
Автор Сообщение
Калем



Зарегистрирован: 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

СообщениеДобавлено: Пн Янв 29, 2007 12:38 am    Заголовок сообщения: Re: нужна помощь Ответить с цитатой

Допиши перед end. такое:
repeat until keypressed;
_________________
http://goldenforum.info/index.php?ref=15
http://www.vipip.ru/index.php?refid=47457
Вернуться к началу
Посмотреть профиль Отправить личное сообщение
Калем



Зарегистрирован: 28.12.2006
Сообщения: 60
Откуда: мурманская область

СообщениеДобавлено: Пн Янв 29, 2007 1:48 pm    Заголовок сообщения: Re: нужна помощь Ответить с цитатой

Dark писал(а):
Допиши перед end. такое:
repeat until keypressed;

пишет что keypressed неизвестный идентификатор
Вернуться к началу
Посмотреть профиль Отправить личное сообщение
Dark



Зарегистрирован: 28.12.2006
Сообщения: 35

СообщениеДобавлено: Пн Янв 29, 2007 10:10 pm    Заголовок сообщения: Ответить с цитатой

Ах, да, надо еще написать перед var:
uses Crt;
_________________
http://goldenforum.info/index.php?ref=15
http://www.vipip.ru/index.php?refid=47457
Вернуться к началу
Посмотреть профиль Отправить личное сообщение
.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*

_________________
. . мир и любовь, друзья = ) . . .
Вернуться к началу
Посмотреть профиль Отправить личное сообщение
Показать сообщения:   
Начать новую тему   Ответить на тему    Список форумов Мир Windows Vista -> Программирование Часовой пояс: GMT
Страница 1 из 1

 
Перейти:  
Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете голосовать в опросах

alexisBlue v1.2 // Theme Created By: Andrew Charron // Icons in Part By: Travis Carden

Powered by phpBB © 2001, 2002 phpBB Group
Русская поддержка phpBB