Viết chương trình pascal để xuất các ký tự từ A đến Z

0 bình luận về “Viết chương trình pascal để xuất các ký tự từ A đến Z”

1. program ct;

   uses crt;

   var A:array[‘A’..’Z’] of string;

         i:integer;

   begin clrscr;

      writeln(‘Cac ki tu tu A den Z la: ‘);

      for i:=’A’ to ‘Z’ do

        write(A[i]);

   readln;

   end.

   Học tốt!

   Bình luận

2. program oken;
   uses crt;
   var i: byte;
   begin
       clrscr;
       write(‘Day ki tu: ‘);
       for i:=65 to 90 do
           write(char(i),’ ‘);
       readln;
   end.

   Bình luận