Hãy viết chương trình tính tổng tích, của các số tự nhiên từ 1 đến N (n được nhập từ bàn phím) bằng cách dùng câu lệnh For...do hoặc While...do?

Giúp em với còn 1 câu này nữa là em xong bài rồi

trình bày cú pháp của câu lệnh lặp while...do trong pascal? cho vd