Please note, this is a STATIC archive of website www.tutorialspoint.com from 11 May 2019, cach3.com does not collect or store any user information, there is no "phishing" involved.
program prob3
!this program between low numbers and high that are divisible by numbers
integer ::n,i,low,high
read *, low,high,n
print *,'low =',low
print *, 'high =', high
do i=low,high
a=mod(i,n)
if (a==0) then
print *, i
end if
end do
end program prob3
Advertisements
We use cookies to provide and improve our services. By using our site, you consent to our Cookies Policy.
AcceptLearn more