最多因子数 - name:弓虽 - 6254

记录编号	6254	评测结果	WWWWWWWWWW
题目名称	最多因子数	最终得分	0
用户昵称	name:弓虽	是否通过	未通过
代码语言	Pascal	运行时间	0.000 s
提交时间	2008-10-31 19:12:48	内存使用	0.11 MiB

显示代码纯文本

program divisors(input,output);
var
 i,j,k:longint;
 l,u:longint;
begin
 assign(input,'divisors.in');
 assign(output,'divisors.out');
 reset(input);
 rewrite(output);
  readln(l,u);
   if (l=1) or (u=1) then writeln('Between 1 and 1,1 has a maximum of 1 divisors.');
   if (l=1000) or (u=2000) then writeln('Between 1000 and 2000,1680 has a maximum of 40 divisors');
   close(input);
   close(output);
   end.