wikioi p1083 Cantor表

最新推荐文章于 2024-12-26 23:27:04 发布

YeasonWu

最新推荐文章于 2024-12-26 23:27:04 发布

阅读量536

点赞数

CC 4.0 BY-SA版权

分类专栏： wikioi天梯 wikioi p1000-1099 noip普及组

本文链接：https://blog.youkuaiyun.com/u011797284/article/details/10258467

wikioi天梯同时被 3 个专栏收录

67 篇文章

订阅专栏

wikioi p1000-1099

21 篇文章

订阅专栏

noip普及组

17 篇文章

订阅专栏

本文分享了一道NOIP普及组的算法题及其解答过程，通过具体的Pascal代码实现，详细介绍了如何求解该问题的方法。

这题应该说也是noip普及组的一道原题，题目有点烦，我还真没做过，分享一下标程：

var
  n,i,a,b:longint;flag:boolean;
function w(i:longint):longint;
var
  j:longint;
begin
  w:=0;
  for j:=1 to i do
    w:=w+j;
end;
begin
  read(n);
  for i:=1 to 1000 do begin
    if n<=w(i) then begin a:=i;n:=n-w(i-1);break;end;
  end;
  if a mod 2=0 then flag:=false else flag:=true;
  b:=1;
  if flag then begin
  for i:=a downto 1 do begin
    if b=n then begin writeln(i,'/',a-i+1);halt;end  else inc(b);
  end;end
  else begin
         for i:=1 to a do begin
         if b=n then begin writeln(i,'/',a-i+1);halt;end else inc(b);
       end;
  end;
end.