Viết trình tính tổng n số tự nhiên chẵn đầu tiên n nhập từ bàn phím số nguyên
-biến n nhập từ bàn phím
Biến i;
Biến S:= 0
For…to…đó…if…then…
Viết trình tính tổng n số tự nhiên chẵn đầu tiên n nhập từ bàn phím số nguyên
-biến n nhập từ bàn phím
Biến i;
Biến S:= 0
For…to…đó…if…then…
Write ( ‘nhap N: ‘ ) ;
Readln( N);
S:=0;
For i:=1 to N do
If i mod 2 = 0 then s:=s+i;
Write ( ‘nhap N: ‘ ) ;
Readln( N);
S:=0;
For i:=1 to N do
If i mod 2 = 0 then s:=s+i;