giúp mình với_ bài này khó_ ai k làm dk thì cũng k sao

[son1997]

Viết chương trình in ra các ký tự từ A đến Z và từ a đến z như dạng sau:
kí tự Mã ASCII của ký tự
A : 65
B : 66
... : ...
Z : 90
a: 97
b: 98
.....
z: 122

[vienle]

Khong can den ma ASCII dau, cac ban chi can lam nhu sau:
program in;
uses crt; {neu dung free pacal thi duoc}
var i:char;
begin
clrscr;{ giong cai 'uses'}
for i:='A' to 'Z' do write(i,' ');
writeln; {lenh nay chi de xuong dong cho dep thoi}
for i:='a' to 'z' do write(i,' ');
readln
end.
----------------------------------------------------------
hoac co the lam nhu sau, dung yeu cau bai toan:
program in;
uses crt;
var i:integer;
begin
clrscr;
for i:=65 to 90 do write(chr(i),' ');
for i:=97 to 122 do write(chr(i),' ');
readln
end.