Groups | Search | Server Info | Keyboard shortcuts | Login | Register [http] [https] [nntp] [nntps]

Groups > ger.ct > #533480

Re: Das Collatz-Problem ...

Show all headers | View raw

Am 14.12.21 um 16:48 schrieb Herwig:
> 2021-12-14 16:49:00 +0100
> 
> ... ist immer noch nicht gelöst.
> 
> Zur Auffrischung: Wähle eine beliebige Natürliche
> Zahl (1, 2, 3, 4, 5, 6, 7, 8, ...). Wenn sie gerade ist,
> dann dividiere durch zwei, wenn sie ungrade ist,
> dann multipliziere mit 3 und addiere 1. Mach mit
> der solcherart ermittelten Zahl dasselbe. Und
> immer wieder.
> 
> Irgendwann landet man bei ..., 4, 2, 1, 4, 2, 1, 4, 2, 1
> 
> Das ist zu beweisen, oder ein GegenBeispiel zu finden.
> 
> Ein Beispiel für 23:
> 
> 23, 70, 35, 106, 53, 160, 80, 40, 20, 10, 5, 16, 8, 4, 2, 1, 4, 2, 1
> 
> Hier ein Online-Rechner zum rumspielen:
> 
> https://www.juergendankert.de/spezmath/html/collatzproblem.html
> 
> Es gibt noch mehrere davon.
> 
> Ist das nicht faszinierend? Wer dieses einfache Problem noch
> vor der Heute-Sendung löst, hat noch vor der TagesSchau seinen
> Platz in der Geschichte der Mathematik gesichert!
> 
> Herwig
> 


Ich hatte mal ein Pascal-Programm geschrieben, das die Zahl suchte mit 
den meisten Iterationen, bis man in die 4-2-1 Schleife kommt.

Schon am C64.

Matthias (Ex-Borland) war so freundlich es mir zu kompilieren für einen 
aktuellen Intel PC. Rennt da wie der Blitz...

DREIN1.exe heißt es.

Habs eben gefunden:

Program drein5;
var z,s:longint;
     max,k:integer;
     begin
k:=0;
max:=0;
write('startzahl=?');
readln (z);
s:=z;
repeat
z:=s;
k:=0;
repeat
   if  odd(z) then z:=3*z+1
   else z:=z div 2;
   inc (k);
until z=1;
   if k > max then begin
     max:=k;
     writeln ('max=',max,'s=',s);
   end;
   s:=s+1;
   if k>350 then writeln ('k=',k,'s=',s);
   until s=20000000
end.

-- 
Bitt um Vrzihung, di Tast " " klmmt manchmal...

Back to ger.ct | Previous | Next — Previous in thread | Next in thread | Find similar | Unroll thread

Thread

Das Collatz-Problem ... Herwig <herwig.huener@t-online.de> - 2021-12-14 07:48 -0800
  Re: Das Collatz-Problem ... Bernd Ohm <invalid@invalid.invalid> - 2021-12-14 16:54 +0100
  Re: Das Collatz-Problem ... Gerrit Heitsch <gerrit@laosinh.s.bawue.de> - 2021-12-14 16:54 +0100
  Re: Das Collatz-Problem ... "Dr. Joachim Neudert" <neudert@5sl.org> - 2021-12-14 17:14 +0100
    Re: Das Collatz-Problem ... "Dr. Joachim Neudert" <neudert@5sl.org> - 2021-12-14 17:38 +0100
    Re: Das Collatz-Problem ... Stefan+Usenet@Froehlich.Priv.at (Stefan Froehlich) - 2021-12-15 11:17 +0000
      Re: Das Collatz-Problem ... "Dr. Joachim Neudert" <neudert@5sl.org> - 2021-12-15 12:23 +0100
        Re: Das Collatz-Problem ... "Dr. Joachim Neudert" <neudert@5sl.org> - 2021-12-15 12:29 +0100
  Re: Das Collatz-Problem ... Frank Klingenhoefer <frank.private@t-online.de> - 2021-12-14 16:31 +0000
    Re: Das Collatz-Problem ... Michael Bode <m.g.bode@web.de> - 2021-12-14 19:16 +0100
      Re: Das Collatz-Problem ... Gerrit Heitsch <gerrit@laosinh.s.bawue.de> - 2021-12-14 19:31 +0100

csiph-web