Thema: Prism ein sortierprogramm

Einzelnen Beitrag anzeigen

resyiii

Registriert seit: 11. Mär 2009
Ort: Oranienburg
31 Beiträge
 
#10

Re: ein sortierprogramm

  Alt 14. Mai 2009, 06:54
und wie sähe das dann im quelltext aus?
so?
Delphi-Quellcode:
program weitsprung;

{$APPTYPE CONSOLE}

uses
  SysUtils;
 type z= Array of String;
   var i,j, anzahl: integer;

begin
write ('Anzahl der Sportler?'); readln (anzahl);
setlength (z, Anzahl);
write ('Name des Sportlers?');
for i:=0 to Anzahl-1 do
begin write (i+1, '.Name? '); readln (z[i]); end;
for j:=0 to Anzahl-1 do
begin write (j+1,'.Weite? '); readln (z[j]); end;
writeln (z[i],z[j]);


  { TODO -oUser -cConsole Main : Hier Code einfügen }
end.
das geht nicht
  Mit Zitat antworten Zitat