VCT in ra màn hình các ký tự từ 'A' đến 'Z' và từ 'z' đến 'a' (ngôn ngữ pascal nhé).Mình mới học tới 5 ngôn ngữ:integer,real,string,longint,char(KO CHÉP MẠNG TỪ BẤT CỨ NGUỒN NÀO KHÁC)

2 câu trả lời

uses crt;
var a:char;
begin
clrscr;
for a:='A' to 'Z' do write(a:2);
writeln(';');
for a:='z' downto 'a' do write(a:2);
readln;
end.

uses crt;
var i:char;
begin
clrscr;
   for i:='A' to 'Z' do write(i,' '); writeln;
   for i:='z' downto 'a' do write(i,' ');
readln
end.