Viết chương trình nhập số n bất kì từ bàn phím. Tính tổng S= 1^2 +2^2+…+n^2 In tổng ra màn hình VD: nhập n=5 S= 1^2+2^2+…+5^2

Viết chương trình nhập số n bất kì từ bàn phím.
Tính tổng S= 1^2 +2^2+…+n^2
In tổng ra màn hình
VD: nhập n=5
S= 1^2+2^2+…+5^2

0 bình luận về “Viết chương trình nhập số n bất kì từ bàn phím. Tính tổng S= 1^2 +2^2+…+n^2 In tổng ra màn hình VD: nhập n=5 S= 1^2+2^2+…+5^2”

  1. program tong_S;

    uses crt;

    var n,i:integer;

           S:longint;

    begin

            clrscr;

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

            S:=0;

            for i:=1 to n do

                    S:=S+i*i;

            write(‘S= ‘,s);

            readln;

    end.

    Bình luận

Viết một bình luận