VCT tính tổng 11+22+33+44+55+66+…+(11n)

0 bình luận về “VCT tính tổng 11+22+33+44+55+66+…+(11n)”

1. uses crt;

   var s,i,n: longint;

   begin

   clrscr;

   write (‘nhap n: ‘);  readln (n);

   for i:=1 to n do s:=s+(i*11);

   writeln (‘tong la: ‘,s);

   readln;

   end.

   Bình luận

2. program btsydn;

   uses crt;

     var n, s, i: integer;

   begin

               clrscr;

               write(‘Nhap n = ‘); readln(n);

               s:=0;

               for i:=1 to n do s:=s+i*11;

               write(‘Tong = ‘, s);

               readln

   end.

   Bình luận