Tin Học - Cho Câu S, Tách Và đếm Số Từ - HOCMAI Forum

• Diễn đàn Bài viết mới Tìm kiếm trên diễn đàn
• Đăng bài nhanh
• Có gì mới? Bài viết mới New media New media comments Status mới Hoạt động mới
• Thư viện ảnh New media New comments Search media
• Story
• Thành viên Đang truy cập Đăng trạng thái mới Tìm kiếm status cá nhân

Đăng nhập Đăng ký

Tìm kiếm

Everywhere Đề tài thảo luận This forum This thread Chỉ tìm trong tiêu đề By: Search Tìm nâng cao… Everywhere Đề tài thảo luận This forum This thread Chỉ tìm trong tiêu đề By: Search Advanced…

• Bài viết mới
• Tìm kiếm trên diễn đàn

Menu Install the app Install Tin họcCho câu S, tách và đếm số từ

• Thread starter lightzss
• Ngày gửi 19 Tháng một 2015
• Replies 6
• Views 4,139

• Bạn có 1 Tin nhắn và 1 Thông báo mới. [Xem hướng dẫn] để sử dụng diễn đàn tốt hơn trên điện thoại

• Diễn đàn
• CÁC MÔN HỌC KHÁC
• Tin học - máy tính
• Tin học trong nhà trường
• Tin học cấp III

You are using an out of date browser. It may not display this or other websites correctly.You should upgrade or use an alternative browser. L

lightzss

[TẶNG BẠN] TRỌN BỘ Bí kíp học tốt 08 môn Chắc suất Đại học top - Giữ chỗ ngay!!

ĐĂNG BÀI NGAY để cùng trao đổi với các thành viên siêu nhiệt tình & dễ thương trên diễn đàn.

Đề bài : Cho xâu S , hãy tách và đếm xem trong xâu có bao nhiêu từ . Mình đc gợi ý là dùng hàm Copy để tách xâu , VD : I Love You gồm có 3 kí tự và 8 từ ( 10 từ nếu tính dấu cách ) . Help me , cần gấp lắm , cám ơn nhiều D

demon311

10 kí tự 3 từ Mã: var s: string; p: array[1..10] of string; i,k,dem: byte; begin write('Nhap xau: ');readln(s); k:=1; For i:=1 to length(s) do If s[i] <> #32 then p[k]=p[k]+s[i] else k=k+1; For k=1 to 50 do If p[k] <> "" then dem=dem+1; write('Co ',dem,' tu'); readln end. L

lightzss

demon311 said: 10 kí tự 3 từ Mã: var s: string; p: array[1..10] of string; i,k,dem: byte; begin write('Nhap xau: ');readln(s); k:=1; For i:=1 to length(s) do If s[i] <> #32 then p[k]=p[k]+s[i] else k=k+1; For k=1 to 50 do If p[k] <> "" then dem=dem+1; write('Co ',dem,' tu'); readln end. Bấm để xem đầy đủ nội dung ...

Bạn ơi cho mình hỏi tại sao lại dùng 32 vs 50 ? Đây là con số ngẫu nhiên à bạn ? Có cách giải nào dùng hàm Copy tất cả các từ trong xâu đã cho rồi đếm trong xâu vừa tách có bao nhiêu kí tự k bạn ? Dùng hàm copy ấy , mình đang làm bài ktra về nhà D

demon311

lightzss said: Bạn ơi cho mình hỏi tại sao lại dùng 32 vs 50 ? Đây là con số ngẫu nhiên à bạn ? Có cách giải nào dùng hàm Copy tất cả các từ trong xâu đã cho rồi đếm trong xâu vừa tách có bao nhiêu kí tự k bạn ? Dùng hàm copy ấy , mình đang làm bài ktra về nhà Bấm để xem đầy đủ nội dung ...

#32 là dấu cách Còn 50 thì mình lấy hơi to tí để lấy các tứ mà Đại khái thuật toán là thế này: ta đọc các kí tự từ 1 tới hết xâu s nếu kí tự khác dấu cách thì thêm vào xâu p tạo thành từ khi xong rồi thì ta xem p có bao nhiêu phần tử khác kí tự trống thì có bấy nhiêu từ L

lightzss

cám ơn bạn tuy nhiên bài của bạn làm tuy đúng nhưng mà đối với lớp 11 của bọn mình thì cô nghi ngờ liền , đại khái là nhập xâu , sau đó tách các từ trong xâu đó sang 1 xâu khác , rồi đếm có tất cả bao nhiêu kí tự , bạn có thể làm 1 bài có hàm copy đc k ? D

demon311

Chịu Có biết cái hàm copy ntn đâu 3 năm trước thì chác là có biết 1 tháng gần đây học code VB.Net nên giờ nhớ mấy cái cơ bản thôi bạn K

khai221050

Rứa rốt cuộc bạn muốn output là số kí tự, số từ (kể cả dấu cách hay khôgn có dấu cách) hay bạn muốn tất You must log in or register to reply here. Chia sẻ: Facebook Reddit Pinterest Tumblr WhatsApp Email Chia sẻ Link

• Diễn đàn
• CÁC MÔN HỌC KHÁC
• Tin học - máy tính
• Tin học trong nhà trường
• Tin học cấp III

Top Bottom

• Vui lòng cài đặt tỷ lệ % hiển thị từ 85-90% ở trình duyệt trên máy tính để sử dụng diễn đàn được tốt hơn.