Aktív témák

• #3256 Divi aktív tag

  2005-10-06 15:50:54 #3256

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Divi

  aktív tag

  Szolgálati közlemény
  PumPi-val a Ph fórumát használtuk pufferként 2 gép között
  
  /órai munka/

• #3252 Divi aktív tag

  2005-10-06 15:45:54 #3252

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Divi

  aktív tag

   

  
  Const
   max = 10;
  
  Var
   mtx: Array[1..max,1..max] of Integer;
     i,j:Integer;
  begin
  Randomize;
  For i:=1 to max do
   For j:=1 to max do
    mtx[i,j]:=Random(90)+10;
  
  For i:=1 to max do
   Begin
   For j:=1 to max do
    Write(mtx[i,j],' ');
    Writeln;
   End;
  Writeln(#10,#13);
  For i:=1 to max do
   Begin
   For j:=max downto 1 do
    Write(mtx[i,j],' ');
    Writeln;
   End;
  
  
   Readln;
  end.
  

  
  
  
  [Szerkesztve]

Aktív témák