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

• #590 VladimirR nagyúr Gabró #589

  Új Válasz 2005-04-08 17:34:36 #590

  Ú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

  

  VladimirR

  nagyúr

  válasz Gabró #589 üzenetére

  nem te vagy a hunyo, en vagyok a hulye
  writeln('A',i,':E',i,',');
  helyett
  writeln(f, 'A',i,':E',i,',');
  

• #587 VladimirR nagyúr Gabró #586

  Új Válasz 2005-04-08 16:16:06 #587

  Ú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

  

  VladimirR

  nagyúr

  válasz Gabró #586 üzenetére

  var i: integer;
       f: text;
  
  begin
          assign(f, 'c:\kimenet.txt');
          rewrite(f);
          i:=1;
          while i<5001 do
          begin
                  writeln('A',i,':E',i,',');
                  inc(i,2);
          end;
          close(f);
  end.
  

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