Mode:
Duration:
1
2
3
4
5
6
7
8
program ArraySum
integer, dimension(5) :: nums = (/1,2,3,4,5/)
integer :: sum = 0, i
do i = 1, 5
sum = sum + nums(i)
end do
print *, 'Sum:', sum
end program ArraySumCoding works best on desktop or with an external keyboard.