A+B: Difference between revisions

210 bytes added ,  5 years ago
m
Line 1,498:
var b := StrToInt(InputBox('A+B', 'Enter 2nd number', '0'));
ShowMessage('Sum is '+IntToStr(a+b));</lang>
 
=={{header|Easyprog.online}}==
<lang>a$ = input
a$[] = str_split a$
while i < len a$[] and a$[i] <> " "
i += 1
.
if i < len a$[]
a = number substr a$ 0 i
b = number substr a$ i -1
print a + b
.</lang>
 
=={{header|EchoLisp}}==
2,083

edits