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

• #781 Drótszamár őstag Blade!!! #780

  Új Válasz 2005-11-23 23:17:47 #781

  Ú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

  

  Drótszamár

  őstag

  válasz Blade!!! #780 üzenetére

  Húú de régen voolt már pascal.
  
  Write(f1,r1);
  
  nem kéne ,1 tehát Write(f1,r1,1);
  
  ha nem akkor sorry a hülyeségért.
  
  

  
  with r1 do
  begin
  Write('Program neve: '); ReadLn(pn);
  Write('CD vagy DVD? '); ReadLn(cdvd);
  Write('A program m‚rete: '); ReadLn(meret);
  Write('Beszerz‚s d tuma: (EEHHNN) '); ReadLn(datum);
  end;
  
  Write(f1,r1);
  

  
  
  ezt meg így csinálnám a helyedben.
  
  
  [Szerkesztve]

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