Câu 1: Viết chương trình đưa ra màn hình các ký tự trong bảng chữ cái từ A đến Z.

Program Bai_tap;

Var i,a:Array[Char] Of Integer;

Ch:Char;

Begin

Writeln(‘Ky tu trong bang chu cai tu A-Z la: ‘);

For Ch:=’A’ To ‘Z’ Do write(i:2);

Readln

end.