pascal 输入30个正整数,计算它们的和,平方和
来源:学生作业帮 编辑:搜搜做题作业网作业帮 分类:综合作业 时间:2024/05/04 07:13:07
pascal
输入30个正整数,计算它们的和,平方和
输入30个正整数,计算它们的和,平方和
program sample;
var i,x,s,q:longint;
begin
s:=0;q:=0;
for i:=1 to 30 do begin
read(x);
inc(s,x);
inc(q,sqr(x));
end;
writeln(s);
writeln(q);
end.
s是和
q是平方和
var i,x,s,q:longint;
begin
s:=0;q:=0;
for i:=1 to 30 do begin
read(x);
inc(s,x);
inc(q,sqr(x));
end;
writeln(s);
writeln(q);
end.
s是和
q是平方和
pascal 输入30个正整数,计算它们的和,平方和
pascal 题,输入5个正整数求它们的最大公约数.
输入n个正整数,先求出它们的平均值x,然后求出所有数据与x的差的平方和S用pascal
pascal语言:输入一个正整数,计算它各数位之和
输入正整数n,然后依次输入n个正整数,计算其中的奇数和与偶数和并输出.
编程C语言:输入两个正整数m,n,计算它们的最大公约数和最小公倍数
输入一个正整数n,再输入n个正整数,判断它们是否唯素数.素数就是只能被1和自身整除的正整数,
pascal输入一个n位的正整数,输出由这n个数字组成的最大正整数.
先输入一个正整数n,再输入任意n个整数,计算并输出这n个整数的和
输入2个正整数m和n,计算m!+n!.
pascal输入a,b求它们的最大公因数和最小公倍数,用辗转相除法
C语言 急 输入5个正整数组num中,求出它们的最大值max 和最小值min