Sourch Codenya :
unit conv;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TFormConv = class(TForm) Label1: TLabel; Label2: TLabel; Label3: TLabel; Label4: TLabel; Label5: TLabel; Label6: TLabel; Label7: TLabel; edRp: TEdit; edPil: TEdit; btConvert: TButton; btExit: TButton; edCon: TEdit; label8: TLabel; procedure btConvertClick(Sender: TObject); procedure btExitClick(Sender: TObject...