| a b stdout |
stdout := FileStream stdout.
FileStream stdin
linesDo: [ :line |
line isEmpty ifFalse: [
(a isNil)
ifTrue: [ a := line asNumber ]
ifFalse: [ b := line asNumber ].
].
].
stdout nextPutAll: '和: '; nextPutAll: (a + b) printString; nl;
nextPutAll: '差: '; nextPutAll: (a - b) printString; nl;
nextPutAll: '積: '; nextPutAll: (a * b) printString; nl.
b = 0
ifTrue: [
stdout nextPutAll: 'ゼロで割ろうとしています'; nl
]
ifFalse: [
stdout nextPutAll: '商: '; nextPutAll: (a / b) printString; nl;
nextPutAll: '剰余: '; nextPutAll: (a \\ b) printString; nl.
].
stdout flush.
fCBhIGIgc3Rkb3V0IHwKc3Rkb3V0IDo9IEZpbGVTdHJlYW0gc3Rkb3V0LgpGaWxlU3RyZWFtIHN0ZGluCiAgICBsaW5lc0RvOiBbIDpsaW5lIHwKICAgICAgICBsaW5lIGlzRW1wdHkgaWZGYWxzZTogWwogICAgICAgICAgICAoYSBpc05pbCkKICAgICAgICAgICAgICAgIGlmVHJ1ZTogWyBhIDo9IGxpbmUgYXNOdW1iZXIgXQogICAgICAgICAgICAgICAgaWZGYWxzZTogWyBiIDo9IGxpbmUgYXNOdW1iZXIgXS4KICAgICAgICBdLgogICAgXS4KCnN0ZG91dCBuZXh0UHV0QWxsOiAn5ZKMOiAnOyBuZXh0UHV0QWxsOiAoYSArIGIpIHByaW50U3RyaW5nOyBubDsKICAgICAgIG5leHRQdXRBbGw6ICflt646ICc7IG5leHRQdXRBbGw6IChhIC0gYikgcHJpbnRTdHJpbmc7IG5sOwogICAgICAgbmV4dFB1dEFsbDogJ+epjTogJzsgbmV4dFB1dEFsbDogKGEgKiBiKSBwcmludFN0cmluZzsgbmwuCgpiID0gMAogICAgaWZUcnVlOiBbCiAgICAgICAgc3Rkb3V0IG5leHRQdXRBbGw6ICfjgrzjg63jgaflibLjgo3jgYbjgajjgZfjgabjgYTjgb7jgZknOyBubAogICAgXQogICAgaWZGYWxzZTogWwogICAgICAgIHN0ZG91dCBuZXh0UHV0QWxsOiAn5ZWGOiAnOyBuZXh0UHV0QWxsOiAoYSAvIGIpIHByaW50U3RyaW5nOyBubDsKICAgICAgICAgICAgICAgbmV4dFB1dEFsbDogJ+WJsOS9mTogJzsgbmV4dFB1dEFsbDogKGEgXFwgYikgcHJpbnRTdHJpbmc7IG5sLgogICAgXS4KCnN0ZG91dCBmbHVzaC4K