Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 23.08.2007, 18:36   #1
delphi_HOBu4oK
 
Регистрация: 23.08.2007
Сообщений: 4
Восклицание консольные приложения

Вот проблема. Я тока начал заниматься программированием и начал учить 2 языка сразу( паскаль и делфи7).
я делаю проги паскаля на делфи в консольном приложении. Проги очень примитивные. Делфи их скопилировал. НО када их запускаешь и вводиш данные то она сразу завершается!
вот код:
program loans( input, output);

{$APPTYPE CONSOLE}

uses
SysUtils;
var
m, n, s, p, r, a : real;

begin
{ TODO -oUser -cConsole Main : Insert code here }
read(s, p, n);
r :=p/100;
a :=exp( ln(1 + r)* n);
m :=(s*r*a)/(12*(a-1));
m :=TRUNC(100*m + 0.5)/100;
writeln ;writeln;
write( ' взято $', s:4:2);
write(' под ',p:5:2,'%');
write('на',n:5:2,'лет');
writeln;
write('месячная выплата $',m:5:2);
writeln;
write('общая прибыль равна $',m*n*12-s:5:2);
writeln
end.
-------------------
в другой проге тоже самое. Я так понял что проблема одна. но какая????
delphi_HOBu4oK вне форума Ответить с цитированием
Старый 23.08.2007, 19:08   #2
still_alive
Great Code Monkey
Форумчанин
 
Аватар для still_alive
 
Регистрация: 09.08.2007
Сообщений: 533
По умолчанию

прямо перед эндом напиши readln;
still_alive вне форума Ответить с цитированием
Старый 23.08.2007, 19:21   #3
delphi_HOBu4oK
 
Регистрация: 23.08.2007
Сообщений: 4
По умолчанию

все равно тож самое. вводиш данные и она закрывается.
delphi_HOBu4oK вне форума Ответить с цитированием
Старый 23.08.2007, 19:26   #4
still_alive
Great Code Monkey
Форумчанин
 
Аватар для still_alive
 
Регистрация: 09.08.2007
Сообщений: 533
По умолчанию

епрст, этот буфер. поставь там два readln;
И еще: русски буквы не выводятся: либо делай chartooem и oemtochar, либо пиши свою функцию первода, либо пиши по-латински...
still_alive вне форума Ответить с цитированием
Старый 24.08.2007, 00:31   #5
delphi_HOBu4oK
 
Регистрация: 23.08.2007
Сообщений: 4
По умолчанию

да ладна ребята, я уже всё сделал! ток вот жаль ни делфи ни паскаль не пишет по русскому! ток инглиш или как там - по-латински
delphi_HOBu4oK вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Многопоточные приложения MaTBeu Общие вопросы C/C++ 17 24.05.2008 20:37
Делаю сайты, пишу маленькие/большие скрипты. Пишу веб-приложения и приложения под Windows. SkyM@n Фриланс 3 29.12.2007 16:21
Приложения в XP vicvtor Win Api 9 31.08.2007 22:55
создание приложения MarinaSt Общие вопросы Delphi 8 04.07.2007 23:51
Иконка приложения Баламут Общие вопросы Delphi 9 05.06.2007 20:14