2 câu trả lời
Đáp án + Giải thích các bước giải:
Công thức tính tổng `S=2+4+6+8+...+100`
Program Tinh tong;
Uses Crt;
Var a,b:integer;
Begin
Clrscr;
a:=0;
For b:=1 to 100 do
If b mod 2=0 then a:=a+b;
Writeln('Tong cua day so tren la: ',a);
readln;
End.