chươn trình tính tổng N số tự nhiên đàu tiên với N nhập từ bàn phím

chươn trình tính tổng N số tự nhiên đàu tiên với N nhập từ bàn phím

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

  1. program tong_dau_tien;

    uses crt;

    var n,i,t:integer;

    begin

           clrscr;

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

           t:=0;

           for i:=1 to n do

                  t:=t+i;

           write(‘Tong ‘,n,’ so tu nhien dau tien la :’,t);

           readln;

    end.

    Bình luận

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