Bộ nhớ sẽ cấp phát cho các biến dưới đây tổng cộng bao nhiêu

Câu hỏi :

Bộ nhớ sẽ cấp phát cho các biến dưới đây tổng cộng bao nhiêu byte?

Var
x,y:integer;
c:char;
ok:boolean;
z: real;