. viết chương trình tính tổng S= 2+4+6+...2n bằng hai cách ( nhập số n từ bàn phím ) 2 . viết chương trình tính tổng S= 1999+1+3+5+...+2n+1 theo hai cách ( n nhập từ bàn phím )
2 câu trả lời
Câu 1:
program CauHoi;
uses crt;
var i,n :integer; S :qword;
begin
write('Nhap so n: '); readln(n);
For i:=1 to n do S:=S+2*i;
writeln('Ket qua la: ',S);
readln;
end.
Thêm câu 2 này
program CauHoi;
uses crt;
var i,n :integer; S :qword;
begin
write('Nhap so n: '); readln(n);
For i:=1 to n do S:=S+(2*i)+1;
writeln('Ket qua la: ',S);
readln;
end.
`1)`
uses crt;
var i,n :integer; S :qword;
begin
write('Nhap so n: '); readln(n);
For i:=1 to n do S:=S+2*i;
writeln('Ket qua la: ',S);
readln;
end.
`2)`
uses crt;
var i,n :integer; S :qword;
begin
write('Nhap so n: '); readln(n);
For i:=1 to n do S:=S+(2*i)+1;
writeln('Ket qua la: ',S);
readln;
end.
Câu hỏi trong lớp
Xem thêm
