proga.dpr
Code:program proga; uses SysUtils, Dialogs; var x : Integer; y : Single; begin DecimalSeparator := '.'; x := StrToIntDef( InputBox('Bugaga!', 'X :', ''), 0); y := StrToFloatDef( InputBox('Muhaha!', 'Y :', ''), 0); ShowMessage('Summ = ' + FloatToStr(x + y)); end.
Bookmarks