给出一个n,接下来有n行,每行一个整数,你要计算这n个整数的和 用pascal做
来源:学生作业帮助网 编辑:作业帮 时间:2024/08/28 01:47:34
![给出一个n,接下来有n行,每行一个整数,你要计算这n个整数的和 用pascal做](/uploads/image/z/14769633-57-3.jpg?t=%E7%BB%99%E5%87%BA%E4%B8%80%E4%B8%AAn%2C%E6%8E%A5%E4%B8%8B%E6%9D%A5%E6%9C%89n%E8%A1%8C%2C%E6%AF%8F%E8%A1%8C%E4%B8%80%E4%B8%AA%E6%95%B4%E6%95%B0%2C%E4%BD%A0%E8%A6%81%E8%AE%A1%E7%AE%97%E8%BF%99n%E4%B8%AA%E6%95%B4%E6%95%B0%E7%9A%84%E5%92%8C+%E7%94%A8pascal%E5%81%9A)
xRj@}eE1d&fo=Lf3;I3EZ,Ki`/ZR-}M6w}M.z:
Olr6$l]|8.hG+w+k1.?'lڗ7i*QyЧ)(/NUt$ivKߎ,"z$(bSl]1z 1ڈVQcPa{b9Y3^`!
˵8t iĴ!d@՟&UNYl&yulNɩe
8;f3
给出一个n,接下来有n行,每行一个整数,你要计算这n个整数的和 用pascal做
给出一个n,接下来有n行,每行一个整数,你要计算这n个整数的和 用pascal做
给出一个n,接下来有n行,每行一个整数,你要计算这n个整数的和 用pascal做
已试过,
程序如下:
program qiuhe;
var n,a,i,s:longint;
begin
readln(n);
for i:=1 to n do
begin
readln(a);
s:=s+a;
end;
writeln('s=',s);
end.