viết chương trình in ra màn hình 20 số tính tổng các số chẵn. giúp mik với

Bởi

viết chương trình in ra màn hình 20 số tính tổng các số chẵn.
giúp mik với

0 bình luận về “viết chương trình in ra màn hình 20 số tính tổng các số chẵn. giúp mik với”

  2. Program baitap;

    Uses crt;

    Var $\text{n,i,tong: integer;}$

    Begin

    Clrscr;

    Write$\text{(‘nhap n < =20:’);}$

    Readln (`n`);

    For

    `i:=1` to `n` do write (`i:3`);

    Writeln;

    $\text{tong:=0;}$

    For `i:=1` to `n` do if `i mod 2=0` then $\text{tong:=tong+i;}$

    Write (‘tong cac so chan la:’, $\text{tong);}$

    Readln 

    End.

    Bình luận

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