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.