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

ogranicenje decimala

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

[ Pregleda: 2079 | Odgovora: 2 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

XGhost

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



+1 Profil

icon ogranicenje decimala26.06.2005. u 00:50 - pre 229 meseci
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;
 
Odgovor na temu

ntojzan
Sandor II Tojzan
Becej

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



Profil

icon Re: ogranicenje decimala26.06.2005. u 03:50 - pre 229 meseci
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
 
Odgovor na temu

Srki_82
Srdjan Tot
Me @ My Home
Ljubljana

Član broj: 28226
Poruke: 1403
82.208.201.*

ICQ: 246436949


+10 Profil

icon Re: ogranicenje decimala26.06.2005. u 21:57 - pre 229 meseci
Check it out: RountTo funkcija
 
Odgovor na temu

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

[ Pregleda: 2079 | Odgovora: 2 ] > FB > Twit

Postavi temu Odgovori

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