program hello

write(*,101)"Hello World"
101 format(A)

end