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

• #2460 dany27 őstag dany27 #2459

  Új Válasz 2011-05-10 18:31:31 #2460

  Ú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

  

  dany27

  őstag

  válasz dany27 #2459 üzenetére

  Var
  S : String;
  error : Integer;
  R : Real;
  
  Begin
  S := '-0.563';
  Val(S, R, error);
  If error > 0 then
  Write('Error in conversion.')
  Else
  Write(R);
  End.

  Már meg van!

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