8 lines
130 B
FortranFixed
8 lines
130 B
FortranFixed
|
character(20) :: s
|
||
|
|
integer :: i
|
||
|
|
|
||
|
|
print*, "Enter a string (max 20 characters)"
|
||
|
|
read*, s
|
||
|
|
print*, "Enter the integer 75000"
|
||
|
|
read*, i
|