Viết chương trình tính tổng sau T=2+4+6+…+2n

0 bình luận về “Viết chương trình tính tổng sau T=2+4+6+…+2n”

1. program ct;

   uses crt;

   var S,i,n:integer;

   begin

   clrscr; 

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

      S:=0;

        for i:=1 to n do S:=S+2*i;

      writeln(‘tong T:=’,S);

   readln

   end.

          

   Bình luận

2. uses crt;

   var i,n,s:integer;

   begin

   clrscr;

   readln(n);

   s:=0;

   for i:=1 to 2n do if i mod 2=0 then s:=s+i;

   write(s);

   readln

   end.

   cho mk câu tlhn+5sao+ cảm ơn nha

   Bình luận