コータさんのアドバイスを基に、「HM1=H-1」「HM2=H-2」「HP1=H+1」のように一部を変更して動かしてみましたら、何故か-8時となったり26時となったりしてしまいました…。どこか変更した箇所が間違えてしまっているのでしょうか? エラーにはならないので、プログラム的には正常に動いていると判断されているようです…。 あと、IF 0<Hの部分はIF 0>Hだと思うのですが、前者でよろしいのでしょうか? ちなみに、この記号を変更しても、計算結果に影響は出ておりません…。