Viết chương trình tính tổng S= 2+3+4+…+12. In S ra màn hình

0 bình luận về “Viết chương trình tính tổng S= 2+3+4+…+12. In S ra màn hình”

1. Program Tinh_tong;

   uses crt; 

   var T,i : integer;

         begin

           T := 0;

           for i := 2 to 12 do T := T+i; 

           Writeln ( ‘ Ket qua la ‘,T );

           Readln;

         end.

          

   Bình luận

2. Program Tinh_toan;

   uses crt;

   var i,n:integer;

   S:longint;

   begin

   For i:=1 to 5 do S:= S+i;

   write(‘tong S = ‘ , S);

   readln

   end.

   Xin hay nhất !

   Bình luận