$を外せばいい。 そして7行目を消して、 8行目を C=3600*B に変更