Bước 1. Nhập N
Bước 2. \(i\leftarrow0\) , \(S\leftarrow0\)
Bước 3. \(i\leftarrow i+1\)
Bước 3. 3.1 Nếu \(i>N\) thì kết thúc thuật toán và đưa ra kết quả.
3.2 \(S\leftarrow S+i^2\) rồi quay lại bước 3
t:=0;
{ tổng ban đầu bằng 0 }
for i:=1 to n do t:=t+sqr(i);
{ duyệt từ i:=1 tới N, tổng:=tổng+bình phương của i }
write(t);
{ in ra màn hình tổng dãy số }
Bước 1. Nhập N
Bước 2. i←0i←0 , S←0S←0
Bước 3. i←i+1i←i+1
Bước 3. 3.1 Nếu i>Ni>N thì kết thúc thuật toán và đưa ra kết quả.
3.2 S←S+i2S←S+i2 rồi quay lại bước 3