viết chương trình tính tổng T=1+2+3+4+5+6+7+8+9+10 bằng câu lệnh lặp với số lặp biết trước for…do

0 bình luận về “viết chương trình tính tổng T=1+2+3+4+5+6+7+8+9+10 bằng câu lệnh lặp với số lặp biết trước for…do”

1. Program BTH;
   uses crt;
   var i,s:byte;
   Begin
       clrscr;
       s:=0;
       For i:=1 to 10 do
           s:=s+i;
       writeln(‘Tong day so tren la: ‘,s);
       readln;
   end.

   Trình bày đẹp cả rồi đấy bạn 

   Bình luận

2. program kaito;

   uses crt;

   var s, i: integer;

   begin

      clrscr;

      for i:=1 to 10 do s:=s+i;

      writeln(‘T = 1 + 2 + 3 + 4 + 5 + 6 + 7 + 8 + 9 + 10 = ‘,s);

      readln

   end.

   CHÚC BẠN HỌC TỐT!!!

   Bình luận