//
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

Advertisements

About pascalteacher

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

Thảo luận

Không có bình luận

Trả lờ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 Đăng xuất / Thay đổi )

Twitter picture

Bạn đang bình luận bằng tài khoản Twitter Đăng xuất / Thay đổi )

Facebook photo

Bạn đang bình luận bằng tài khoản Facebook Đăng xuất / Thay đổi )

Google+ photo

Bạn đang bình luận bằng tài khoản Google+ Đăng xuất / Thay đổi )

Connecting to %s

Các tác giả

Categories

Tháng Mười Hai 2014
H B T N S B C
« Th11   Th1 »
1234567
891011121314
15161718192021
22232425262728
293031  

NCT Computer

Flickr Photos

Thống kê

  • 209,568 lượt xem

pascalteacher.nct@gmail.com


Trang huấn luyện học sinh giỏi Tin học

%d bloggers like this: