viết cương trình tính tổng số n số tự nhiên đầu tiên liên tiếp với n được nhập từ bàn phím

0 bình luận về “viết cương trình tính tổng số n số tự nhiên đầu tiên liên tiếp với n được nhập từ bàn phím”

1. program kaito;

   uses crt;

   var s, n, i: integer;

   begin

      clrscr;

      write(‘nhap so n: ‘); readln(n);

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

      writeln(‘Tong cua ‘,n,’ so tu nhien dau tien lien tiep la: ‘,s);

      readln

   end.

   CHÚC BẠN HỌC TỐT!!! 

   Bình luận

2. program tong;

   uses crt;

   var i,n,s:integer;

   begin

   readln(n); s:=0;

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

   writeln(s);

   readln;

   end.

   Chúc bạn học tốt 🙂

   Bình luận