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

• #682 Rover623 félisten AND1 #678

  Új Válasz 2005-05-15 09:17:55 #682

  Ú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

  

  Rover623

  félisten

  válasz AND1 #678 üzenetére

  Nálad vmi más gond lesz...amikor 98-am volt, ment a Pacal...váltottam XP-re, megy a Pacal...
  
  
  
  
  [Szerkesztve]

• #679 VladimirR nagyúr AND1 #678

  Új Válasz 2005-05-14 14:15:18 #679

  Ú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 AND1 #678 üzenetére

  tp fizetos, abbol imho nem talalsz
  freepascal? Bővebben: link
  

• #608 gLes őstag AND1 #605

  Új Válasz 2005-02-19 15:41:32 #608

  Ú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

  

  gLes

  őstag

  válasz AND1 #605 üzenetére

  Hát ez nem túl sok információ de mivel TP-ben vagyunk gondolom arra gondol, hogy van egy X méretű String-eket tartalmazó tömb, és ha az összeset megtöltötted, akkor kiírsz egy csillagot és pá...de ez hülyeség...úgyhogy inkább azt kéne, hogy van monnyuk egy 100db Stringből álló tömböd (azé 100 monnyuk mer senkinek sem lesz türelme ennyit beírogatni) és akkor te szépen readln-nal olvasgatod be a tömbbe a cuccost és ha beír egy *-ot az illető akkor kiszállsz...monnyuk nemtom kezel-e ekkora tömböt a TP A Delphi kezelne, sőt akár dinamikusan is
  
  Szal a beolvasás vhogy így:
  
  var
  A: array[1..100] of String;
  I: Integer;
  S: String;
  begin
  for I := 1 to 100 do
  A[I] := '';
  I := 0;
  repeat
  Inc(I);
  readln(A[I]);
  until (A[I] = '*') or (I = 100);
  end;
  
  Szal vhogy így
  
  [Szerkesztve]

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