Die magische fünf

**Privateer3000**

Hi folks,

weiß jemand eine einfachere Methode
zu prüfen ob eine Zahl durch 5 teilbar ist?
Oder geht es nur über den Rechenweg:
a div 5 = c dann überprüfen
ob c ein integer und keine real ist...

greetz

**Neutral General**

if a mod 5 = 0 then ShowMessage('a ist durch 5 teilbar (c: Integer)'); Gruß
Neutral General

**3_of_8**

if a mod 5 = 0 then...

**Privateer3000**

Danke erstmal,
seh ich das falsch?
Dies würde bedeuten dass das ergebnis 0 ist!
Das ist ja nicht der Fall!Das valide ergebnis muss
für mich 5,10,15...100 usw. sein.

**3_of_8**

mod ist der Restwertoperator.

0 mod 5=0
1 mod 5=1
2 mod 5=2
3 mod 5=3
4 mod 5=4
5 mod 5=0
6 mod 5=1
...

**Privateer3000**

Danke!

**Klaus01**

Wenn ich Deine Frage im ersten Beitrag so lese,
kann es dann sein das Du sowas gemeint hast:

markieren

Delphi-Quellcode:

			if a mod 5 = 0 then

  c:= a div 5;

Grüße
Klaus

**Privateer3000**

nein Klaus, es ist wie oben vorgeschlagen
if a mod 5 then...
Restwert bei teilung durch 5 muss null sein.

Danke an alle

**himitsu**

Zitat von Privateer3000:

Oder geht es nur über den Rechenweg:
a div 5 = c dann überprüfen
ob c ein integer und keine real ist...

bei DIV kommt immer ein Integer raus ... der Rest(Kommaanteil) wird unterschlagen (es wird sozusagen abgerundet).

Die magische fünf

Die magische fünf

Re: Die magische fünf

Re: Die magische fünf

Re: Die magische fünf

Re: Die magische fünf

Re: Die magische fünf

Re: Die magische fünf

Re: Die magische fünf

Re: Die magische fünf

Forumregeln

Privateer3000 Registriert seit: 10. Jun 2002 Ort: Jena 1.128 Beiträge Delphi 10.4 Sydney	#1 Die magische fünf 4. Aug 2006, 18:21 Hi folks, weiß jemand eine einfachere Methode zu prüfen ob eine Zahl durch 5 teilbar ist? Oder geht es nur über den Rechenweg: a div 5 = c dann überprüfen ob c ein integer und keine real ist... greetz Peter +++Versuch es nicht mit Gewalt + Nimm einen größeren Hammer! +++
	Zitat

Neutral General Registriert seit: 16. Jan 2004 Ort: Bendorf 5.219 Beiträge Delphi 10.2 Tokyo Professional	#2 Re: Die magische fünf 4. Aug 2006, 18:22 if a mod 5 = 0 then ShowMessage('a ist durch 5 teilbar (c: Integer)'); Gruß Neutral General Michael "Programmers talk about software development on weekends, vacations, and over meals not because they lack imagination, but because their imagination reveals worlds that others cannot see."
	Zitat

3_of_8 Registriert seit: 22. Mär 2005 Ort: Dingolfing 4.129 Beiträge Turbo Delphi für Win32	#3 Re: Die magische fünf 4. Aug 2006, 18:22 if a mod 5 = 0 then... Manuel Eberl „The trouble with having an open mind, of course, is that people will insist on coming along and trying to put things in it.“ - Terry Pratchett
	Zitat

Privateer3000 Registriert seit: 10. Jun 2002 Ort: Jena 1.128 Beiträge Delphi 10.4 Sydney	#4 Re: Die magische fünf 4. Aug 2006, 18:50 Danke erstmal, seh ich das falsch? Dies würde bedeuten dass das ergebnis 0 ist! Das ist ja nicht der Fall!Das valide ergebnis muss für mich 5,10,15...100 usw. sein. Peter +++Versuch es nicht mit Gewalt + Nimm einen größeren Hammer! +++
	Zitat

3_of_8 Registriert seit: 22. Mär 2005 Ort: Dingolfing 4.129 Beiträge Turbo Delphi für Win32	#5 Re: Die magische fünf 4. Aug 2006, 18:52 mod ist der Restwertoperator. 0 mod 5=0 1 mod 5=1 2 mod 5=2 3 mod 5=3 4 mod 5=4 5 mod 5=0 6 mod 5=1 ... Manuel Eberl „The trouble with having an open mind, of course, is that people will insist on coming along and trying to put things in it.“ - Terry Pratchett
	Zitat

Privateer3000 Registriert seit: 10. Jun 2002 Ort: Jena 1.128 Beiträge Delphi 10.4 Sydney	#6 Re: Die magische fünf 4. Aug 2006, 19:02 Danke! Peter +++Versuch es nicht mit Gewalt + Nimm einen größeren Hammer! +++
	Zitat

Klaus01 Registriert seit: 30. Nov 2005 Ort: München 5.767 Beiträge Delphi 10.4 Sydney	#7 Re: Die magische fünf 4. Aug 2006, 21:47 Wenn ich Deine Frage im ersten Beitrag so lese, kann es dann sein das Du sowas gemeint hast: markieren Delphi-Quellcode: if a mod 5 = 0 then c:= a div 5; Grüße Klaus Klaus
	Zitat

Privateer3000 Registriert seit: 10. Jun 2002 Ort: Jena 1.128 Beiträge Delphi 10.4 Sydney	#8 Re: Die magische fünf 5. Aug 2006, 12:19 nein Klaus, es ist wie oben vorgeschlagen if a mod 5 then... Restwert bei teilung durch 5 muss null sein. Danke an alle Peter +++Versuch es nicht mit Gewalt + Nimm einen größeren Hammer! +++
	Zitat