Media Summary: character name*20 write(*,*)'Enter your name :' read(*,537)name 537 format(A) write(*,*)'Your name is :' write(*,595)name 595 ... program advance_number implicit none integer i, n read *, n print *, 'non-line breaks' do i = 1, n write (*, fmt='(I4)', advance='no') ... Good day viewers welcome to another version of my
Fortran Programming Tutorial 4 Logical - Detailed Analysis & Overview
character name*20 write(*,*)'Enter your name :' read(*,537)name 537 format(A) write(*,*)'Your name is :' write(*,595)name 595 ... program advance_number implicit none integer i, n read *, n print *, 'non-line breaks' do i = 1, n write (*, fmt='(I4)', advance='no') ... Good day viewers welcome to another version of my Please watch: "Computer Program:- Prints all odd positive integers less than 100" ... FORTRAN TUTORIAL (PART-4) Go TO Statement program factorial implicit none ! define variables, some with initial values integer :: nfact = 1 integer :: n ! compute factorials do n ...