How to Modify a FORTRAN Program to Exclude Multiples of 5?

  • Context: Fortran 
  • Thread starter Thread starter Nicolaus
  • Start date Start date
  • Tags Tags
    Fortran
Join the discussion
Ask a follow-up here, or get your own question answered by working scientists, mathematicians and engineers — people, not an autocomplete.
Real named experts · corrections over time · the nuance an AI answer skips
1 reply · 2K views
Nicolaus
Messages
73
Reaction score
0
How would I modify the program so it doesn't generate an output for integers that are multiples of 5? (e.g. if range was 1-20, then no lines would be printed for 5, 10, 15, 20.)

program squares
implicit none

integer*2 start, finish, i

! ----------------------------------------------Prompt and Input
print*, "Enter the range (two integers) ..."
read*, start, finish

! ----------------------------------------------Validation & Processing
if (start .GT. finish) then
print*, "Invalid: the start must be less than the end value!"
else if (start .LT. 0) then
print*, "Invalid: the range must not have negative values!"
else
do i = start, finish
write(*,*) i, sqrt(i*1.)
end do
end if
! ----------------------------------------------
end
 
Physics news on Phys.org


You could use an if statement that checks whether i % 5 == 0. The % operator is modulus and returns the remainder after division.