Viết chương trình tính 1+1+1+-+1 (n số hạng) 25/07/2021 Bởi Valentina Viết chương trình tính 1+1+1+….+1 (n số hạng)
Ý tưởng: C1: Chạy 1 vòng for từ 1 đến n rồi tăng tổng lên 1; C2. Xuất n ra là xong vì 1+1…+1 n số hạng thì sẽ bằng n. Nhiều điểm nên mình sẽ làm cả 2 cách, thây hay thì cho CTLHN nhé. C1: uses crt;var n,i,s:longint;beginclrscr; write(‘n=’);readln(n); for i:=1 to n do s:=s+1; writeln(s);readlnend. C2. uses crt;var n:longint;beginclrscr; write(‘n=’);readln(n); writeln(n);readlnend. Bình luận
program tinhtong; uses crt; var n,i,t:integer; begin clrscr; write(‘Nhap n: ‘); readln(n); t:=0; for i:=1 to n do t:=t+1; write(‘Tong la: ‘,t); readln end. Bình luận
Ý tưởng:
C1: Chạy 1 vòng for từ 1 đến n rồi tăng tổng lên 1;
C2. Xuất n ra là xong vì 1+1…+1 n số hạng thì sẽ bằng n.
Nhiều điểm nên mình sẽ làm cả 2 cách, thây hay thì cho CTLHN nhé.
C1:
uses crt;
var n,i,s:longint;
begin
clrscr;
write(‘n=’);readln(n);
for i:=1 to n do s:=s+1;
writeln(s);
readln
end.
C2.
uses crt;
var n:longint;
begin
clrscr;
write(‘n=’);readln(n);
writeln(n);
readln
end.
program tinhtong;
uses crt;
var n,i,t:integer;
begin
clrscr;
write(‘Nhap n: ‘); readln(n);
t:=0;
for i:=1 to n do
t:=t+1;
write(‘Tong la: ‘,t);
readln
end.