Morsecode Algorithmus
1 Beiträge gefunden:
0 Dokumente und 1 Forumsbeiträge0 Dokumente zum Thema Morsecode Algorithmus:
1 Forumsbeiträge zum Thema Morsecode Algorithmus:
procedure Ausgabe;
var anzahl : integer;
procedure Ausgabe (n : integer; Zeichenkette : string);
begin
if (n = 0) then
anzahl:= anzahl + 1;
else begin
Ausgabe(n-1, Zeichenkette+ `.`);
if (n > 1) then
Ausgabe(n-2, Zeichenkette+`-`);
end;
end;
wenn ich zum beispiel 5 einsetze was kommt daraus?