Új hozzászólás Aktív témák

• #848 c4-eXp aktív tag Darth_Revan #847

  Új Válasz 2005-12-12 19:29:34 #848

  Új hozzászólás

  Ö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

  

  c4-eXp

  aktív tag

  válasz Darth_Revan #847 üzenetére

   

  program valami;
  uses crt;
  const n=valamennyi, m=valamennyi, l=valamennyi;
  var matrix  : array[1..n,1..m] of integer;
      i, osszeg : integer;
  begin
    osszeg:=0;
    matrix_feltoltese;
    for i:=1 to n do 
      osszeg:=osszeg+matrix[i,l];
    writeln(osszeg);
    readln;
  end.

  
  
  Jó régen pascaloztam már, de asszem valahogy így lesz.

Új hozzászólás Aktív témák