Question

Viết chương trình thực hiện tính tổng dãy số S= 11+13+15+...+101 ( sử dụng lệnh lặp với số lần chưa biết trước)

Answer 1

uses crt;

var s,i:integer;

begin

clrscr;

s:=0;

i:=11;

while i<=101 do

  begin

s:=s+i;

i:=i+2;

end;

writeln(s);

readln;

end.

Answer 2

*Cách làm:*