viết chương trình nhập số nguyên bất kỳ , kết thúc khi nhập số 0 .In ra màn hình tổng các số vừa nhập Cần gấp ạ !

0 bình luận về “viết chương trình nhập số nguyên bất kỳ , kết thúc khi nhập số 0 .In ra màn hình tổng các số vừa nhập Cần gấp ạ !”

1. var    n,s: integer;

   begin

   s:=0;

   repeat

   writeln(‘Nhap so nguyen: ‘); read(n);

   s:=s+n;

   until n = 0;

   writeln(‘tong cac so vua nhap: ‘,s);

   readln

   end.

   Bình luận