Chinese remainder theorem: Difference between revisions

m
(Fortran version)
Line 1,429:
IMPLICIT INTEGER (A-Z)
 
nPRINT =*, crt(3, [2, 3, 2], [3, 5, 7])
PRINT *, ncrt(3, [2, 3, 2], [3, 6, 7]) ! no solution
 
n = crt(3, [2, 3, 2], [3, 6, 7])
PRINT *, n ! no solution
END
 
357

edits