viết chương trình tổng n số tự nhiên đầu tiên với n được nhập từ bàn phím (n<100) " giúp mình với"

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

1. INPUT: dãy n số tự nhien đầu tiên

   OUTPUT:tổng các số trong dãy đó

   Bước 1:SUM<–0;i<–0.

   Bước 2:SUM←SUM+i; i←i+1.

   Bước 3:Nếu i≤n, thì quay lại bước 2, ngược lại thông báo giá trị của SUM và kết thúc thuật toán.

   Bình luận

2. Var i,n: integer;

   s: longint;

   Begin

   Write(‘Nhap so n=’); readln(n);

   s:=0;

   i:=1;

   while i<=n do

   begin

   s:=s+i; i:=i+1;

   end;

   Write(‘Tong cua’,n,’ so tu nhien dau tien la’,s);

   Readln

   End.

   Đây bạn, may mà mk qua pascal rồi :))

   Bình luận