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

• #812 GodHeart senior tag Drótszamár #810

  Új Válasz 2005-11-25 22:13:31 #812

  Ú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

  

  GodHeart

  senior tag

  válasz Drótszamár #810 üzenetére

  ohh szal ha ilyen izékbe teszem a programot, akkor is lefuttatja, ha azthiszi, hogy rosz!? Tök jóó!
  
  --------
  
  nah ezt viszont enmértem!
  
  

  program adatcucc;
  uses crt;
  type
      tipfile = file of integer;
      fajl = file;
      szovegfajl = text;
  var
     f1 : tipfile;
     f2 : szovegfajl;
     f3 : szovegfajl;
     de,dv,q : string;
     a : string;
  
  begin
  clrscr;
  writeln('Melyik f jlt szeretn‚ beolvasni!?');
  writeln('A fajl belesz irva egy m sik f jlba!');
  Writeln('Adja meg a beolvasand˘ f jl hely‚t!');
  read(de);
  Assign(f3,de);
  reset(f3);
  read(f3,a);
  close(f3);
  writeln('A f jl tartalma: ',a);
  writeln('Hova szeretn‚ a f jl tartalm t ˇrni: ');
  readln(dv);
  Assign(f2,dv);
  rewrite(f2);
  write(f2,a);
  close(f2);
  readkey;
  end.

  
  
  A program a ''readln(dv);'' sort kihagyja, kiírja újra a ''a'' változó tartalmát, és egy gombnyomásra kilép. magyarul nem kéri be a dv-t, és az a-t így nem is írja ki a tetszőleges fájlba. miért? Nah ezt most nem értem... Amíg nem változóval adtam meg a dv-t hanem konkrét fájlt írtam oda, addig okés volt. most nem értem.
  
  ui. változókba fenn sok sületlenség van, nem kell nézni, más próbálkozásból maradt ott

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