Das Syrakus-Problem
Program Syrakus;
uses crt;
var y,x,n: longint;
begin
clrscr;
writeln('Das Syrakus-Problem');
writeln('');
writeln;
writeln;
writeln('Eine Folge von Zahlen soll gebildet werden:');
writeln('Die 1. Zahl der Folge ist eine beliebige positive Zahl.');
writeln('Die nchste Zahlen der Folge werden wie folgt berechnet:');
writeln('Ist eine Zahl der Folge gerade, dann wird sie durch 2 geteilt.');
writeln('Der Quotient ist dann die nchste Zahl der Folge.');
writeln('und zum Produkt wird 1 addiert.');
writeln('Die Summe ist dann die nchste Zahl der Folge.');
writeln('Die letzte Zahl der Folge ist 1.');
writeln;
repeat
Write('Gib also nun bitte eine beliebige positive Zahl ein: ');readln(x);
writeln;
n:=1;
if x>0
then write(x,', ')
else writeln('Dies ist keine positive ganze Zahl!');
until x>0;
y:=0;
Repeat
if x mod 2 = 0
then
begin
x:= x div 2;
write(x,', ');
end
begin
x:= x*3+1;
write(x,', ');
end;
n:=n+1;
if y<x
then y:=x;
until x = 1;
writeln;
writeln('Diese Folge besteht aus ',n,' Zahlen.');
writeln('Die grte Zahl der Folge ist ',y);
readln;
end.
Inhalt
Folge von Zahlen mit folgenden Festlegungen:
1.Zahl beliebig positiv
nächsten:
Zahl gerade dann Teilen durch 2 Quotient nächste Zahl der Folge
Zahl ungerade,dann multiplikation mit 3 und addition mit 1 Summe nächste Zahl der Folge
letzte Zahl der Folge ist 1. (172 Wörter)
1.Zahl beliebig positiv
nächsten:
Zahl gerade dann Teilen durch 2 Quotient nächste Zahl der Folge
Zahl ungerade,dann multiplikation mit 3 und addition mit 1 Summe nächste Zahl der Folge
letzte Zahl der Folge ist 1. (172 Wörter)
Hochgeladen
von unbekannt
Schlagwörter
Optionen
0 weitere Dokumente zum Thema "Sonstige"
2 Diskussionen zum Thema im Forum
2 Diskussionen zum Thema im Forum
- videos und musik in der homepage (13 Antworten)
- Suchen und Sortieren von Daten (3 Antworten)
- mehr ...
Wenn du dieses Dokument verwendest, zitiere es bitte als: "Das Syrakus-Problem", https://e-hausaufgaben.de/Hausaufgaben/D2044-Pascal-das-Syrakus-Problem.php, Abgerufen 30.05.2024 14:48 Uhr
Es handelt sich hier um einen fremden, nutzergenerierten Inhalt für den keine Haftung übernommen wird.
Es handelt sich hier um einen fremden, nutzergenerierten Inhalt für den keine Haftung übernommen wird.
PASSENDE FRAGEN:
- videos und musik in der homepagewie schon der titel sagt ich wollte ein wenig an meiner hp basteln und weiß jetz nicht wie ich musik hinzufügen soll damit die ..
- Suchen und Sortieren von DatenMorjen Leute, und zwar mal eine kleine sache: Ich muss ne Facharbeit über das genannte Thema verfassen, hab schon im i-net ..
- mehr ...