Hãy sửa lại cho đúng  trong các câu lệnh sau đây

Hãy sửa lại cho đúng  trong các câu lệnh sau đây

a, if a>b then max:=a; else max:=b;

b, var A: Array[1..50] Of  Real;

c, var Chieucao: Array{1..50} Of  Real;

d, X:=10; while X:=10 do X := X+5;
 

Câu 3:  Viết chương trình nhập N số nguyên từ bàn phím và in ra màn hình số lớn nhất. N cũng được nhập từ bàn phím.

Câu 4: Em hãy viết chương trình Pascal tính giá trị biểu thức sau (với số tự nhiên n được nhập vào từ bàn phím):

A =<!--[if gte vml 1]> <!--[endif]--><!--[if gte mso 9]--><xml> </xml><![endif]--><!--[if gte vml 1]> <!--[endif]--><!--[if gte mso 9]--><xml> </xml><![endif]-->

Câu 5: (2 điểm) Em hãy viết cấu trúc câu lệnh lặp với số lần biết trước? Nêu hoạt động của vòng lặp?

Câu 6: Hãy sửa lại cho đúng  trong các câu lệnh sau đây

a, if a>b then max:=a; else max:=b;

b, var A: Array[1..50] Of  Real;

c, var Chieucao: Array{1..50} Of  Real;

d, X:=10; while X:=10 do X := X+5;

Câu 7: Viết chương trình nhập N số nguyên từ bàn phím và in ra màn hình số nhỏ nhất. N cũng được nhập từ bàn phím.