Viết chương trình tính

Viết chương trình tính: p=p*1*2*3*...*n; với n được nhập từ bàn phím?
​gợi ý : cho i chạy từ 1 đến n thì làm: p:=p*i;
ai giải được tui cho 50 xu tui sẽ kiểm tra các bạn làm đúng ko