4 条题解

  • 0
    @ 2017-11-29 12:41:59

    一个简单的Haskell递推。

    main=print.(\(n:p:[])->solve p!!(n-p)).map read.words=<<getLine
      where solve x=(x*2):zipWith(+)(solve x)[x+1..]
    
  • 0
    @ 2017-10-15 16:42:39

    #include<iostream>
    using namespace std;
    int main()
    {
    int n,p,a[600],i;
    cin>>n>>p;
    a[p]=p*2;
    for(i=p+1;i<=n;i++)
    a[i]=a[i-1]+i;
    cout<<a[n];
    }
    前面那个没我好。

  • 0
    @ 2017-10-15 16:37:35

    #include<cstdio>
    #include<string>
    #include<iostream>
    using namespace std;
    int main()
    {
    int a[600],i,p,n;
    cin>>n>>p;
    a[p]=2*p;
    for(i=p+1;i<=n;i++)
    {
    a[i]=a[i-1]+i;
    }
    cout<<a[n];
    }
    前面那个没我好。

  • 0
    @ 2017-10-15 16:26:00

    #include<cstdio>
    #include<string>
    #include<iostream>
    using namespace std;
    int main()
    {
    long n,p,i,m,s,f[600];
    cin>>n>>p;
    f[p]=2*p;
    for (i=p+1; i<=n; i++)
    f[i]=f[i-1]+i;
    cout<<f[n];
    }

  • 1

平面分割(surface.pas/c/cpp)

信息

难度
6
分类
(无)
标签
递交数
46
已通过
13
通过率
28%
上传者