作业帮 > 综合 > 作业

Nocomachns定理.用free pascal

来源:学生作业帮 编辑:搜搜做题作业网作业帮 分类:综合作业 时间:2024/08/15 12:53:32
Nocomachns定理.用free pascal
Description
Nocomachns定理.
任何一个n的三次方一定可以表示成n个连续的奇数和.
输入:n(n
Nocomachns定理.用free pascal
program t1;
var i,j,n,k:longint;
begin
readln(n);
j:=n*(n-1)+1;
k:=n*(n+1)-1;
write(j);
for i:=j+2 to k do
if i mod 2=1 then write('+',i);
end.