Sử dụng câu lệnh for…do để tính tổng các số tự nhiên chẵn từ 2 đến 100

0 bình luận về “Sử dụng câu lệnh for…do để tính tổng các số tự nhiên chẵn từ 2 đến 100”

1. Xin câu trả lời hay nhất!

   Phần khai báo tên không quan trọng mình bỏ qua nên nếu bạn cần thì tự thêm vào nhé

   Chương trình:

   var i:integer;

   s:=longint;

   begin

   s:=0;

   for i:= 2 to 100 do if i mod 2=0

   then s:=s+i

   write(‘s=’,s);

   readln

   end.

   Bình luận

2. var s: word;

         i: byte;

   Begin

       S:=0;

       For i:=2 to 100 do if (i mod 2 = 0)

           Then s:=s+i;

       Write(s);

       Readln

   End.

   Bình luận