viết chương trình tính tổng của các số nguyên trong phạm vi từ 1 đến n, với n được nhập từ bàn phím

0 bình luận về “viết chương trình tính tổng của các số nguyên trong phạm vi từ 1 đến n, với n được nhập từ bàn phím”

1. program tinh_tong;

   Var

         n,S,i:integer;

   Begin

          write(‘Nhap N: ‘); readln(n);

          S:=0;

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

          write(‘Tong la: ‘,S);

          Readln;

   End.

   Bình luận