Câu 4: a) var NAMSINH[1..30] of integer;
b) var CHIEUCAO[1..50]of integer;
c) Không thực hiện được: chỉ số cuối không được là một biến mà phải là giá trị cụ thể.
Câu 6:
uses crt;
var n,i:longint;
begin
clrscr;
write('n=');readln(n);
for i:=1 to n do write('hello ');
readln
end.
Câu 7:
uses crt;
var n,i:longint;
begin
clrscr;
writeln('|--------------------------------|');
writeln('| TRAN VAN B |');
writeln('| LOP 8 |');
writeln('| TUONG THCS NINH TRI TRA VINH |');
writeln('|--------------------------------|');
readln
end.