| Autor |
Beitrag |
ralle90
Hält's aus hier
Beiträge: 9
|
Verfasst: So 01.03.09 15:31
hallo,
hab folgende frage
haben zur zeit in der schule division mit rest über den befehl mod
daten typ ist integer
also a:=b mod c;
a ist also 3 bei 15/6 , weil der rest ja berechnet
wie lässt sich aber aus dieser rechnung ausgeben , wie oft b durch c teilbar ist.
bei den beipiel also 2mal
gib es da eine einfache möglichkeit diese (2) auzugeben
gruß
|
|
Skiller-1988
 
Beiträge: 100
Win XP | Debian | Ubuntu
C# | PHP | VB.NET
|
Verfasst: So 01.03.09 15:37
Hi,
kenne mich zwar nicht so gut mit Delphie aus aber ich denke ( noch aus alten Pascal zeiten zu wissen ) es müsste einen div - Befehl geben der genau dein Problem löst.
  Delphi-Quelltext
_________________ ~ Wer Rechtschreibfehler findet darf sie behalten ~
|
|
LexXis
Beiträge: 170
Erhaltene Danke: 3
|
Verfasst: So 01.03.09 15:37
Ich bestätige das an der Stelle mal 
|
|
Jakob_Ullmann
Beiträge: 1747
Erhaltene Danke: 15
Win 7, *Ubuntu GNU/Linux*
*Anjuta* (C, C++, Python), Geany (Vala), Lazarus (Pascal), Eclipse (Java)
|
Verfasst: So 01.03.09 16:39
Richtig.
Wenn du es unbedingt mit mod machen willst, dann so:
Delphi-Quelltext
1:
| a := round(b - (b mod c)) |
|
|
GTA-Place
Beiträge: 5248
Erhaltene Danke: 2
WIN XP, IE 7, FF 2.0
Delphi 7, Lazarus
|
Verfasst: So 01.03.09 16:47
Weitere Möglichkeit wäre Floor() oder Trunc() um die Nachkommastellen abzuschneiden.
_________________ "Wer Ego-Shooter Killerspiele nennt, muss konsequenterweise jeden Horrorstreifen als Killerfilm bezeichnen." (Zeit.de)
|
|
DeddyH
Ehemaliges Mitglied
Erhaltene Danke: 1
|
Verfasst: So 01.03.09 17:29
Integer hat keine Nachkommastellen.
|
|
Timosch
Beiträge: 1314
Debian Squeeze, Win 7 Prof.
D7 Pers
|
Verfasst: So 01.03.09 18:39
 DeddyH hat folgendes geschrieben  : | | Integer hat keine Nachkommastellen. |
Das weiß GTA-Place definitiv.  Aber mod lässt sich auch simulieren, indem man normal dividiert (also mit einem Ergebnis, das wahrscheinlich Nachkommastellen hat), und dann Trunc bzw. Floor anwendet. _________________ If liberty means anything at all, it means the right to tell people what they do not want to hear. - George Orwell
|
|
GTA-Place
Beiträge: 5248
Erhaltene Danke: 2
WIN XP, IE 7, FF 2.0
Delphi 7, Lazarus
|
Verfasst: So 01.03.09 18:42
_________________ "Wer Ego-Shooter Killerspiele nennt, muss konsequenterweise jeden Horrorstreifen als Killerfilm bezeichnen." (Zeit.de)
|
|
ralle90 
Hält's aus hier
Beiträge: 9
|
Verfasst: So 01.03.09 19:01
|
|
DeddyH
Ehemaliges Mitglied
Erhaltene Danke: 1
|
Verfasst: So 01.03.09 19:29
|
|
