VCT pascal tính tổng lũy thừa của dãy số 1^2+2^2+3^2+....+n^2,với n được nhập từ bàn phím .sau đó xuất kết quả ra màn hình. Giúp mình nha, mình cần gấp
2 câu trả lời
uses crt;
var i,n:integer;
s:longint;
begin
clrscr;
write('n='); readln(n);
s:=0;
for i:=1 to n do
s:=s+sqr(i);
writeln('tong S=',s);
readln;
end.
Câu hỏi trong lớp
Xem thêm
