a)xác định bài toán:
input:số nguyên dương n
output:tổng n số nguyên
b)thuật toán:
B1:nhập n
B2:tong ←0,i←1
B3:tong←tong+i,i←i+1
B4:nếu i≤n thì đến B3,ngược lại đến B5
B5:kết thúc.
c)viết chương trình:
program tinhtong;
uses crt;
var i,n,tong: integer;
begin
clrscr;
writeln ('nhap n');readln(n);
tong:=0;i:=1;
while i<n do
begin tong:=tong+i;
i:=i+1 end;
write ('tong la:',tong);
readln;
end.