Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как поделить деньги на булки? [D5, XP]


Юнкер ©   (2006-06-27 19:25:00) 

Var M : Currency; // сколько денег в кармане
     C : Integer;  // цена 1 булки. Не пинайте за Integer, так надо
     V : Integer   // количество булок

Как узнать сколько булок можно купить?

V := M div C ?

Как правильно делить Currency на Integer ?
Помогите, первый раз вижу Currency, как с ним работать?


Palladin   (2006-06-27 23:11:00) [1]

ну проверить то сложно чтоли?


Юнкер   (2006-06-27 19:49:00) [2]

Спасибо.
А как еще узнать за сколько можно продать V булок?

M := C*V ;  //  так чтоли?  Integer to Currency ?

Я все правильно делаю?


Джо   (2006-06-27 19:30:00) [3]

V := Trunc(M/C);


Наверх

Титульная страница Поиск, карта сайта Написать письмо