RosettaCodeData/Task/A+B/DWScript/a+b.dw

4 lines
160 B
Text
Raw Permalink Normal View History

2013-04-10 16:57:12 -07:00
var a := StrToInt(InputBox('A+B', 'Enter 1st number', '0'));
var b := StrToInt(InputBox('A+B', 'Enter 2nd number', '0'));
ShowMessage('Sum is '+IntToStr(a+b));