電子レンジでの温め時間換算

10 INPUT "ｼﾃｲﾜｯﾄｽｳ=　";W1
20 INPUT "ｼﾃｲﾌﾝｽｳ= ";M1
30 INPUT "ｼﾃｲﾋﾞｮｳｽｳ= ";S1
40 INPUT "ｱﾀﾀﾒﾜｯﾄｽｳ= ";W2
50 A=W1*(M1*60+S1)/W2
60 M2= INT (A/60)
70 S2= INT (A-M2*60)
80 PRINT STR$ (M2);"ﾌﾝ";STR$ (S2);"ﾋﾞｮｳ"


弁当等に記載されている時間とは違う結果になるけど気にしない