Cho n là 1 số nguyên hãy tính tổng các số trong n ví dụ n = 29 => tổng của nó bằng 29

1 câu trả lời

uses crt;
var n,i,s:longint;
begin
 clrscr;
  write('nhap n=');readln(n);
  s:=0;
  for i:=1 to n do s:=s+i;
  write('tong cac so trong n la:',s);
 readln;
end.

Câu hỏi trong lớp Xem thêm