Viết chương trình tính tổng bình phương của n số lẻ dương đầu tiên { VD n=3 thi tinh {(1*1)+(3*3)+(5*5)}

0 bình luận về “Viết chương trình tính tổng bình phương của n số lẻ dương đầu tiên { VD n=3 thi tinh {(1*1)+(3*3)+(5*5)}”

1. program tinh_tong;

   uses crt;

   var n,i,d:integer;

         t:longint;

   begin

        clrscr;

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

        t:=0;  d:=1;  i:=1;

        while d<=n do

             begin

                  t:=t+i*i;

                  i:=i+2;

                  d:=d+1;

             end;

        write(‘Tong cua ‘,n,’ so le duong dau tien la: ‘,t);

        readln;

   end.

   Bình luận