計算結果が異常である
Posted: 2010年1月28日(木) 01:39
コード: 全て選択
#N88BASIC
Dim a As Byte
Dim b As Long
Dim c As Long
a = 240
b = 50
c = a+b
Print c
期待値は290。
なぜ型の拡張規則を有効にならないのか?
コード: 全て選択
#N88BASIC
Dim a As Byte
Dim b As Long
Dim c As Long
a = 240
b = 50
c = a+b
Print c
コード: 全て選択
Dim a As BytePtr
Dim b As Long, c As Long
a=250
b=40
c=a+b
コード: 全て選択
#N88BASIC
Dim a As Byte
Dim b As Long
Dim c As Long
a = 240
b = 50
c = a As Long+b
Print c