作业帮 > 综合 > 作业

Free pascal 求连续数字的平方和

来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/05/23 20:11:25
Free pascal 求连续数字的平方和
Description 编程求1平方+2平方+...+n平方 Input 输入一行,只有一个整数n(1
program aa; var n,i,sum:integer; begin sum:=0; readln(n); for i:=1 to n do sum:=sum+i*i; writeln(sum); readln(); end.