C1:Viết chương trình đưa ra màn hình bảng chữ cái tiếng anh? Mng giúp mình với ạ

*Dạng viết hoa:

uses crt;
var i:char;
begin
   clrscr;
   for i:=’A’ to ‘Z’ do write(i,’ ‘); writeln;
   readln
end.

*Dạng không viết hoa:

uses crt;
var i:char;
begin
   clrscr;
   for i:=’a’ to ‘z’ do write(i,’ ‘); writeln;
   readln
end.