Modular
Approach –1
program add2
call input(a,b)
call add(a,b,s)
call output(a,b,s)
stop
end
c-------------------------------
subroutine add (a,b,s)
s = a + b
return
end
c-------------------------------
subroutine input (a,b)
print *, ' This program adds 2 real numbers'
print *, ' Type them in now separated by a comma or
space‘
read *, a,b
return
end
c-------------------------------
subroutine output (a,b,s)
print *,
' The sum of ', a,' and ' , b
print *, ' is ' , s
return
end