//
you're reading...
Bài tập huấn luyện, Chủ đề tập hợp (set), Dùng cho cấp THCS, Dùng cho cấp THPT

Bài tập về tập hợp (set) – Bài 04

Bài tập về tập hợp (set)

Trang này của Nguyễn Công Tác

Bấm vào các liên kết dưới đây để xem các trang liên quan:


Lý thuyết bài 11 – Kiểu tập hợp (set)
Về trang trước – Bài 03
Đến trang sau – Bài 05


Bài 04:

Viết chương trình nhập vào một chuỗi ký tự từ bàn phím. In ra màn hình các chữ cái (in hoa) không xuất hiện trong chuỗi đã nhập.

Phần mã sẽ được trình bày trong vùng màu xám như dưới đây:


Mẫu chương trình


 Program Tim_ky_tu;
Var
    Chuoi:String;
   Co,Khong:Set of Char;
   i:Integer;
   Ch:Char;
Begin
    Writeln('TIM KY TU KHONG XUAT HIEN TRONG CHUOI');
   Writeln('-------------------------------------');
   Write('-Nhap mot chuoi ky tu: ');
   Readln(Chuoi);
   Co:=[];
   For I:=1 To Length(Chuoi) Do
       Co:=Co+[Upcase(Chuoi[i])];
   Khong:=['A'..'Z'] - Co;
   Writeln;
   Writeln('     Nhung ky tu khong co trong chuoi nay la: ');
   Writeln;
   For Ch:='A' To 'Z' Do
       If Ch In Khong Then
          Write(Ch,', ');
   Writeln;
   Writeln;
   Write('   Bam phim de ket thuc ');
   Readln
End.

Kết quả in ra
TIM KY TU KHONG XUAT HIEN TRONG CHUOI
————————————-
-Nhap mot chuoi ky tu: thanh pho ho chi minh
Nhung ky tu khong co trong chuoi nay la:
B, D, E, F, G, J, K, L, Q, R,S,U,V,W,X,Y,Z,
Bam phim de ket thuc


Nguồn tài liệu

Tham khảo từ Internet.


Giải thuật và lập trình – Lê Minh Hoàng
Trang bài học Pascal cơ bản
Dự phòng
Dự phòng

About pascalteacher

Trang thông tin Toán học và Tin học

Thảo luận

Chưa có phản hồi.

Gửi phản hồi

Mời bạn điền thông tin vào ô dưới đây hoặc kích vào một biểu tượng để đăng nhập:

WordPress.com Logo

Bạn đang bình luận bằng tài khoản WordPress.com Log Out / Thay đổi )

Twitter picture

Bạn đang bình luận bằng tài khoản Twitter Log Out / Thay đổi )

Facebook photo

Bạn đang bình luận bằng tài khoản Facebook Log Out / Thay đổi )

Google+ photo

Bạn đang bình luận bằng tài khoản Google+ Log Out / Thay đổi )

Connecting to %s

Các tác giả

Danh mục

Tháng Mười Hai 2014
M T W T F S S
« Nov   Jan »
1234567
891011121314
15161718192021
22232425262728
293031  

NCT Computer

Flickr Photos

sunset

Detroit Night

White-winged Scoter | Macreuse à ailes blanches

More Photos

Thống kê

  • 95,281 lượt xem

%d bloggers like this: