Chào các bạn! Truyen4U chính thức đã quay trở lại rồi đây!^^. Mong các bạn tiếp tục ủng hộ truy cập tên miền Truyen4U.Com này nhé! Mãi yêu... ♥

pas cau 9

var

i,n:integer;

s:longint;

begin

writeln('nhapn');

readln(n);

s:=0;

for i:=1 to n do

s:=s+sqr(i);

writeln('tongla:',s);

readln;

end.

Bạn đang đọc truyện trên: Truyen4U.Com

Tags: #câu#pas