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

• #2276 Dathomir csendes tag Lortech #2275

  Új Válasz 2008-09-06 21:27:21 #2276

  Ú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

  

  Dathomir

  csendes tag

  válasz Lortech #2275 üzenetére

  Köszönöm szépen a segítséged!

  program Sales;
  (* Infested with bugs. Find them. *)
  const TaxRate = 0006.5;
  VAR Cost, total, tax: real;
  begin
  WriteLN('Input cost');
  read(cost);
  tax := TaxRate * cost;
  total := Cost + TaxRate;
  write('Output the total');
  Write( total );
  END.

  Ilyenre javítottam ki, ez most már jó? Megpróbáltam exe kiterjesztésben menteni, de nem indult el!
  Üdv!
  Dathomir

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