程序创建乘法表

Question

program loops

implicit none

integer x
integer::y

do x=1,10
  y=3*x
  print*,"3 times ",x,"=",y
end do

end

我想为3创建一个乘法表。程序可以编译并运行，但格式或显示效果不好，因为有很多空格。如何改进或格式化以使显示效果良好？