Viết chươnh trình tính tổng S =1+2+3-+N với N là một x tùy ý giờ người lập trình nhập Mông mn giúp em với ạ mai em kiểm trả nên cần bài để ôn ạ

0 bình luận về “Viết chươnh trình tính tổng S =1+2+3-+N với N là một x tùy ý giờ người lập trình nhập Mông mn giúp em với ạ mai em kiểm trả nên cần bài để ôn ạ”

1. $\text{uses crt;}$

   $\text{var n,i,s:integer;}$

   $\text{begin}$

   $\text{writeln(‘nhap vao so n:’);}$

   `s:=0`;

   $\text{for i:=1 to n do }$ `S:=s+i;`

   $\text{writeln(‘tong tu 1 den n la :’,s);}$

   $\text{readln}$

   $\text{end.}$

   Bình luận

2. program tong_s;

   uses crt;

   var n,i,S:integer;

   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