Srodne teme
Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

ogranicenje decimala

[es] :: Pascal / Delphi / Kylix :: ogranicenje decimala

[ Pregleda: 694 | Odgovora: 2 ]

 Postavi temu Odgovori

Autor
Pretraga teme: Traži
Markiranje Štampanje RSS

XGhost

Član broj: 33279
Poruke: 149
*.pppoe442.bih.net.ba.



Profil

icon ogranicenje decimala26.06.2005. u 00:50

Ako podijelim neki broj dobijem rezultat npr 12,12354686 te mi ne odgovara
duzina brojeva. Kako da dobijem npr 12,12. Konkretan zadatak je slijedeci

procedure TForm1.Iznos;
var
A,B,C: Currency;
begin

A:= StrToCurr(Edit1.Text);
B:= StrToCurr(Edit2.Text);
C:= R / K ;
Edit3.Text:=CurrToStr(C);
end;
26.06.2005. u 00:50 

ntojzan
Sandor II Tojzan
5digistar Inc.
Kobe city

Član broj: 36657
Poruke: 166
*.stcable.co.yu.

Sajt: www.5digistar.co.jp


Profil

icon Re: ogranicenje decimala26.06.2005. u 03:50
Sta je R i K?

Ako si mislio na:

C:=A/B

onda resenje mozes da ogranicis ovako:

C:=Round(A*100/B)/100

a ako bas insistiras na R i K, onda je resenje:

C:=Round(R*100/K)/100
26.06.2005. u 03:50 

Srki_82
Srdjan Tot
Me @ My Home
Ljubljana

Član broj: 28226
Poruke: 1402
82.208.201.*

ICQ: 246436949


Profil

icon Re: ogranicenje decimala26.06.2005. u 21:57
Check it out: RountTo funkcija
DirectX na srpskom | GLScene na srpskom

There are only 10 types of people in this world; those who understand binary and those who don't.
26.06.2005. u 21:57 

[es] :: Pascal / Delphi / Kylix :: ogranicenje decimala

[ Pregleda: 694 | Odgovora: 2 ]

 Postavi temu Odgovori

Srodne teme
Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.