1. Erläutern Sie den folgenden Verschlüsselungsalgorithmus!

zusammenfalten · markieren

Delphi-Quellcode:

procedure TKryptobox.Verschluesseln;
(* -------------------------------------------------------------- *)
var
  i : integer;

  begin
  Geheimtext := '' ;
  Vorbehandeln(Klartext);
  i := 1;
  while i <= length(klartext) do
  begin
    geheimtext := geheimtext + klartext[i];
    i := i + 3;
  end;
  i := 2;
  while i <= length(klartext) do
  begin
    geheimtext := geheimtext + klartext[i];
    i := i + 3;
  end;
  i := 3;
  while i <= length(klartext) do
  begin
    geheimtext := geheimtext + klartext[i];
    i := i + 3;
  end;
end;

Optimieren Sie den Algorithmus durch Einführung einer weiteren Schleife!

2. Schreiben Sie ein Unterprogramm, das einen eingegebenen Text invertiert, zunächst als Struktogramm, dann als Pascal-Unterprogramm (Prozedur und Funktion)!

3. Erstellen Sie einen Algorithmus, der in einem übergebenen Text die Häufigkeit eines übergebenen Zeichens bestimmt und zurückliefert. Schreiben Sie den Algorithmus als Pascal-Unterprogramm (Funktion und Prozedur)!
Notieren Sie zu beiden Unterprogrammen jeweils einen Aufruf in einem anderen Programmteil und die dazu notwendigen Variablendeklarationen.

----------------------------------------------------------------------------------------------

Kann mir bitte jemand bei der Beantwortung der Fragen helfen, da ich absolut keine Ahnung davon hab. (1. bekomm ich hin, aber 2. und 3. nicht...)

Soll das eine Aufgabe für das Volk sein? Oder welchen Sinn hat Dein Beitrag?

Moin Curby,

Antworten.

Zum einen: Verwende für Deine Threads aussagekräftige Überschriften.
Zum anderen: Eine Frage pro Thread.
Bitte ändere das umgehend.
Danke.

@Curby:
Tut mir leid, daß ich Dich hier so abblitzen lassen muß. Aber dieses Forum wurde nicht eingerichtet, um Dir Deine Hausaufgaben zu machen. Aus Deiner Fragestellung wird nicht deutlich, daß Du Dich selber intensiv mit einer Lösung auseinandergesetzt hättest.
Wo ist z.B. das Problem bei #2? Weißt Du nicht, was in Struktogramm ist, ie es aufgebaut ist oder was ein Pascal-Unterprogramm ist oder hast Du die Aufgabenstellung nicht verstanden?
Und bei #3 wäre es auch hilfreich zu wissen, wo genau Deine Probleme liegen. Wir werden Dir hier keine pauschalen Lösungen präsentieren.

Jep, ich habe keine Ahnung, was ein Struktogramm und wie ein Pascal Unterprogramm aufgebaut ist.
Des weiteren wäre ich dankbar, wenn mir überhaupt mal jemand die Aufgabenstellung erklären könnte, da es sich für mich wie chinesisch anhört.

Moin Curby,

Zitat von Christian Seehase:

Moin Curby,

Antworten.

Zum einen: Verwende für Deine Threads aussagekräftige Überschriften.
Zum anderen: Eine Frage pro Thread.
Bitte ändere das umgehend.
Danke.

Hab jetzt alles einzeln gepostet.

Moin Curby,

gut, dann mach' ich hier mal dicht.