Mode:
Duration:
1
2
3
4
5
6
7
8
9
program ResettableCounter
integer :: count = 0
count = count + 1
count = count + 1
count = count + 1
print *, 'Count:', count
count = 0
print *, 'Count after reset:', count
end program ResettableCounterCoding works best on desktop or with an external keyboard.