Question

Viết chương trình tính tổng:

S= 1+3=5+7+...+19

sử dụng câu lệnh điều kiện if then và câu lệnh for do

mọi người giúp mình nha cảm ơn nhiều.

Answer 1

var i,S:integer;

begin

S:=0;

for i:=1 to 19 do if i mod 2 = 1 then S:=S+i;

writeln('S=',S);

readln

end.

Answer 2

S = 1 + 3 + 5 + 7 + .... + 19

Ta có :

SSH = (19 - 1) : 2 + 1 = 10 (số hạng)

Tổng = (19 + 1) x 10 : 2 = 100

Vậy tổng trên bằng 100.

* Mik mới tham gia nên mong các bn ủng hộ nhé!