Em hãy viết chương trình tính giá trị biểu thức A=1+3+5+7+…+2n+1 (Áp dụng câu lệnh lặp chưa biết số lần lặp) 25/07/2021 Bởi Gianna Em hãy viết chương trình tính giá trị biểu thức A=1+3+5+7+…+2n+1 (Áp dụng câu lệnh lặp chưa biết số lần lặp)
program chuabietsolanlap; uses crt; var n,i,t:integer; begin clrscr; write(‘nhap n: ‘); readln(n); i:=0; t:=0; while i<n do begin t:=t+(2*i+1); i:=i+1; end; write(‘Tong la: ‘,t); readln end. Bình luận
uses crt;var a,i,n:longint;beginclrscr; write(‘n=’);readln(n); i:=-1; REPEAT inc(i,2); A:=a+i; until i=2*n+1; writeln(‘A= ‘,a);readlnend. #Chúc học tốt Bình luận
program chuabietsolanlap;
uses crt;
var n,i,t:integer;
begin
clrscr;
write(‘nhap n: ‘); readln(n);
i:=0; t:=0;
while i<n do
begin
t:=t+(2*i+1);
i:=i+1;
end;
write(‘Tong la: ‘,t);
readln
end.
uses crt;
var a,i,n:longint;
begin
clrscr;
write(‘n=’);readln(n);
i:=-1;
REPEAT
inc(i,2);
A:=a+i;
until i=2*n+1;
writeln(‘A= ‘,a);
readln
end.
#Chúc học tốt