diff --git a/hello-world.f90 b/hello-world.f90
index ec9d527..2a30286 100644
--- a/hello-world.f90
+++ b/hello-world.f90
@@ -1,4 +1,9 @@
 program main
   implicit none
+  integer :: i, x(10)
   print *, "Hello world"
+  x = 5
+  do i = 1, 10
+    print *, "x(", i,") + i is ", x(i) + i
+  end do
 end program main