Gymcoswig

Aus ProgrammingWiki

Archivierte Version vom 2012-11-27T10:21:43+00:00. Aktuelle Version

Felder am Gymnasium Coswig

Testbeispiel Felder

procedure felder(a);
 var feld : array[1..10] of integer;
        i,a : integer;
 begin
  for i:=1 to 10 do
   begin
    feld[i]:=i+a;
   end;
 for i:=1 to 10 do
 writeln feld[i];

 end;

felder(5);
Gib eine Zahl für a ein..

Gymcoswig

Felder am Gymnasium Coswig

Suche