Cho đoạn chương trinh sau:
a:=0; T:=0;
Write(‘Nhap so N: ‘); Readln(N);
While a>N do
Begin
a:=a+1;
Write(‘Nhap so thu’,a,’=’); Readln(b)
T:=T+b;
End;
Write(‘Ket qua can tim la:’,T);
a) Hãy tìm và sửa lỗi cho đoạn chương trình trên.
b) Cho biết đoạn chương trình trên thực hiện công việc gì?
( Vote 5 sao luôn )
a:=0; T:=0;
Write(‘Nhap so N: ‘); Readln(N);
While a>N do
Điều kiện sai ,sửa While a<= N do
Begin
a:=a+1;
Write(‘Nhap so thu’,a,’=’); Readln(b); thiếu dấu chấm phẩy
T:=T+b;
End;
Write(‘Ket qua can tim la:’,T);
đoạn chương trình trên thực hiện công việc nhập $N+1$ số và cộng chúng với nhau
a) điều kiện while do sai.
readln(b) thiếu ;
sửa:
a:=0; T:=0;
Write(‘Nhap so N: ‘); Readln(N);
While a<=N do
Begin
a:=a+1;
Write(‘Nhap so thu’,a,’=’); Readln(b);
T:=T+b;
End;
Write(‘Ket qua can tim la:’,T);
b)
Đoạn chương trình trên tính tổng dãy số nhập từ bàn phím