Tính và đưa ra màn hình tổng từ 1 đến N , N nhập từ bàn phím, N là số nguyên dương. giải giúp mình vs ạ Mình sẽ vote 5 sao

0 bình luận về “Tính và đưa ra màn hình tổng từ 1 đến N , N nhập từ bàn phím, N là số nguyên dương. giải giúp mình vs ạ Mình sẽ vote 5 sao”

1. Program NhatNgu;
   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(‘S = ‘,s);
           Readln
   End.

   Bình luận

2. Program Tinhtong;

   Uses crt;

   Var S,i,n:Interger;

   BEGIN       Write(‘nhap so n: ‘ );

                    Readln(n);

                    S:=0;

                    For i:=1 to n do 

                                      S:=S+i;

                  Writeln ( ‘Tong= ‘,);

                  Readln;

   END.      

   Bình luận