while02.m

来自「实现matlab很多功能的源代码」· M 代码 · 共 5 行

n = 1;
while prod(1:n) < 1e100
	n = n+1
end
fprintf('%g! = %e > 1e100\n', n, prod(1:n));