B1 tính tổng S= 1+3+......+(2n+1) với n được nhập vào bàn phím và n<=10^9 sử dụng câu lệnh for B2 Tính tổng các số chẵn S= 2+4+.......+2n với n được nhập vào bàn phím và n>=10^9 sử dụng câu lệnh for LÀM HỘ MÌNH VỚI Ạ MÌNH CẢM ƠN NHIỀU Ạ.
2 câu trả lời
Bài 1 :
program tinh_tong;
uses crt;
var s, i, n : integer;
begin
clrscr;
write('nhap so nguyen n :');readln(n);
s := 0;
for i :=1 to n do
if ( i mod 2 <> 0 ) then
s := s + i;
writeln('tong S la :', s );
readln
end.
Bài 2 :
program tinh_tong;
uses crt;
var s, i, n : integer;
begin
clrscr;
write('nhap so nguyen n :');readln(n);
s := 0;
for i :=1 to n do
if ( i mod 2 = 0 ) then
s := s + i;
writeln('tong S la :', s );
readln
end.
Câu hỏi trong lớp
Xem thêm