Question 1: give all possible combinations of numbers 1, 2 and 3 to form three digits and output them. Use FORTRAN to solve the problem

Question 1: give all possible combinations of numbers 1, 2 and 3 to form three digits and output them. Use FORTRAN to solve the problem


i=1j=2k=3i1=100*i+10*j+ki2=100*i+10*k+ji3=100*j+10*i+ki4=100*j+10*k+ii5=100*k+10*j+ii6=100*k+10*i+jprint*,i1print*,i2print*,i3print*,i4print*,i5print*,i6end



How to find the greatest common factor of two numbers with FORTRAN


Program main! Division by integer m, ncommon m, nprint *,'Please input two positive integers: 'read (*, *) m, ncall Euclid (m, n) endprogramsubroutine Euclid (m, n) integer rdo while (n.ne. 0) r = mod (m, n) m = nn = re



4 > 2 or 3 in VFP


The following is the calculation process
4>2 or 3