Viết chương trình tính x^n

II/ TỰ LUẬN
Câu 1 :  Điền X vào các ô sao cho phù hợp và giải thích vì sao ?
Câu                            |Đúng| Sai|  Giải thích
a) for i = 1 to 10 do writeln ( 'A');
b) var X: Array[ 5...10] Of Char ;
c)X: = 10 ; while X = 10 do X : =X + 5;
d) if x > 5 then a: = b; else  m: = n; 
Câu 2:  đánh dấu [ x] vào ô đúng hoặc sai tương ứng  trong các câu lệnh Pascal trong chương trình tính tổng 10 số tự nhiên đầu tiên, nếu sai sửa lại ?
 Câu lệnh            Đúng| Sai | Sửa lại
Program  Chương trình
Var i, s : real ;
Const n: = 10 ;
Begin
Wile i <= n : 10; 
Begin
S : = s + i
i = i + 1
End.
Writeln ( s)
Realn
End ;
Câu 3 : Viết chương trình tính x bình n
Câu 4 :  Viết chương trình tính n !
Câu 5 :  Viết chương trình tính tích 30 số tự nhiên đầu tiên
Câu 6 :  Viết chương trình tính tổng 200 số tự nhiên đầu tiên
Câu 7 :  Viết chương trình tính tổng : S = 1 +2+3+ ...+ n. Trong đó n là số nguyên nhập từ bàn phím