记录编号 119969 评测结果 AAAAAAAAAA
题目名称 [SPOJ 1739] Pell方程 最终得分 100
用户昵称 GravatarNBWang 是否通过 通过
代码语言 Pascal 运行时间 0.049 s
提交时间 2014-09-14 21:29:42 内存使用 0.12 MiB
显示代码纯文本
program cc;
var
x,y,n:longint;
begin ;
assign(input,'pell.in');
assign(output,'pell.out');
reset(input);
rewrite(output);
readln(n);
for x:=1 to 10000 do
for y:=1 to 10000 do
begin
if x*x-n*y*y=1 then begin writeln(x,' ',y); halt;end;
end;
close(input);
close(output);
end.