program calc
integer ::x
write (*,*) "好きな整数を入力してください"
read (*,*) x
write (*,*) "その10倍は", x * 10, "です"
end program calc
cHJvZ3JhbSBjYWxjCiAgaW50ZWdlciA6OngKCiAgd3JpdGUgKCosKikgIuWlveOBjeOBquaVtOaVsOOCkuWFpeWKm+OBl+OBpuOBj+OBoOOBleOBhCIKICByZWFkICgqLCopIHgKICB3cml0ZSAoKiwqKSAi44Gd44GuMTDlgI3jga8iLCB4ICogMTAsICLjgafjgZkiCgplbmQgcHJvZ3JhbSBjYWxjCg==