HÃY TÌM VÀ SỮA LỖI CỦA CHƯƠNG TRÌNH

Câu 2(2 điểm) : Hãy tìm và sữa lỗi của chương trình?

Program Tinh tong1; {Dòng 1}

Var N, S : Integer; {Dòng 2}

Begin {Dòng 3}

S := 0; N :=1; {Dòng 4}

While n <= 50 Do {Dòng 5}

S = S + N/(N+1); {Dòng 6}

N : N +1; {Dòng 7}

Write ( Tong S =', S: 7: 3); {Dòng 8}

Readln {Dòng 9}

End. {Dòng 10}