vài điểm cuối cùng viết chương trình tính tổng n số tự nhiên đầu tiên

0 bình luận về “vài điểm cuối cùng viết chương trình tính tổng n số tự nhiên đầu tiên”

1. *Tính tổng:

   program tinhtongnso;

   uses crt;

   var s,i,n:integer;

   begin

   clrscr;

   writeln(‘Nhap so n’);readln(n);

   s:=0;

   for i:=1 to n do s:=s+i;

   writeln(‘Tong la:’,s);

   readln

   end.

   Xin ctlhn ạ!

   Bình luận