để tính tổng S=1+2+3+4....+n; 

em hãy chọn đoạn lệnh S:=0 và ?

để tính tổng s=2+4+6 ... +n; 

em chọn lệnh:

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

b) for i:=1 to n do if (i mod 2) <> 2 then s:=s+1;

c) for i:=1 to n do s:=s+1;

d) for i:=1 to n do if (i mod 2) = 1 then s:=s+1;

mn giúp em với ạ, cảm ơn mn nhiều

GIÚP EM MN ƠI, MAI EM NỘP R Ạ T-T.

Xoá sạch màn hình kết quả, sử dụng vòng lặp While . do hoặc For..do viết chương trình tính tổng sau: S=1/1*2+1/2*3+1/3*4+.....+1/n*(n+1)

N nhập từ bàn phím

cho dãy số nguyên S=1+2+3...N với 0<N, N<=10 N được nhập từ bàn phím em hãy tính tổng của dãy số trên và biểu thị ra màn hình

Câu 14: (3,0 điểm) Em hãy sử dụng câu lệnh lặp với số lần biết trước viết chương trinh Pascal để giải bài toán sau: Tính tổng S= 1 + 2 + 3 +...+n

Em hãy sắp xếp chương trình tính tổng N số tự nhiên sau cho phù hợp?

Var N, i: integer;

Write(‘Nhap so N=’); s:=0;

S: Longint; readln(n);

For i:=1 to n do

Begin

Program tinh_tong;

S:=s+i;

Writeln(‘Tong cua ‘, N, ‘ So tu nhien dau tien s=’, s);

End.

Em hãy sắp xếp chương trình tính tổng N số tự nhiên sau cho phù hợp?

Var N, i: integer;

Write(‘Nhap so N=’); s:=0;

S: Longint; readln(n);

For i:=1 to n do

Begin

Program tinh_tong;

S:=s+i;

Writeln(‘Tong cua ‘, N, ‘ So tu nhien dau tien s=’, s);

End.

Readln

Câu 2: (2,0 điểm) TÍNH TỔNG

Cho tổng S = 1^2 + 3^2 + 5^2 + ... + (2n – 1)^2 với 𝑛 ∈ 𝑁.

Yêu cầu: Tính tổng S.

Dữ liệu vào: Nhập từ bàn phím số tự nhiên N (0 <n<=10000)

Kết quả: In kết quả tính được của tổng S ra màn hình.

Câu 1:  tính tổng s:=1+2+3..+n

Câu 2: Tính tổng s:=1+1/2+1/3+…+1/n