Viết chương trình tính tổng n số tự nhiên đầu tiên. Với n đc nhập vào từ bàn phím

Viết chương trình tính tổng n số tự nhiên đầu tiên. Với n đc nhập vào từ bàn phím

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

  1. program ct;

    uses crt;

    var S,i,n:integer;

    begin

    clrscr;

      write(‘nhap n:=’);readln(n);

       S:=0;

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

       writeln(‘tong cua n so tu nhine la:’,S);

    readln

    end.

    Bình luận

Viết một bình luận