Viết CT Nén Xâu Kí Tự S được Nhập Từ Bàn Phím. VD
Có thể bạn quan tâm
Tìm kiếm với hình ảnh
Vui lòng chỉ chọn một câu hỏi
Tìm đáp án- Đăng nhập
- |
- Đăng ký
Hoidap247.com Nhanh chóng, chính xác
Hãy đăng nhập hoặc tạo tài khoản miễn phí!
Đăng nhậpĐăng kýLưu vào
+
Danh mục mới
- nguyensydung
- Chưa có nhóm
- Trả lời
0
- Điểm
100
- Cảm ơn
0
- Tin Học
- Lớp 11
- 10 điểm
- nguyensydung - 11:00:08 26/03/2020
- Hỏi chi tiết
- Báo vi phạm
Hãy luôn nhớ cảm ơn và vote 5* nếu câu trả lời hữu ích nhé!
TRẢ LỜI
- Duchuy16042006
- Chưa có nhóm
- Trả lời
114
- Điểm
1384
- Cảm ơn
55
- Duchuy16042006
- 26/03/2020
c:=1;dem:=1;//c là chỉ số chỉ ký tự
for i:=2 to length(s) do
if s[i]=s[c] then inc(dem) else
begin
write(dem,s[c]);//xuat ra dem va ky tu (3A)
dem:=1;
c:=i;
end;
Hãy giúp mọi người biết câu trả lời này thế nào?
starstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarGửiHủy- Cảm ơn
- Báo vi phạm
- Duchuy16042006
- Chưa có nhóm
- Trả lời
114
- Điểm
1384
- Cảm ơn
55
nhập xuất tự làm
- Duchuy16042006
- Chưa có nhóm
- Trả lời
114
- Điểm
1384
- Cảm ơn
55
nếu làm kiểu chuyển ra xâu thứ hai, báo để sửa cho
- nguyensydung
- Chưa có nhóm
- Trả lời
0
- Điểm
100
- Cảm ơn
0
Mình mù tin bạn ạ😅bạn làm hoàn chỉnh giúp mình luôn đc k ạ
- Duchuy16042006
- Chưa có nhóm
- Trả lời
114
- Điểm
1384
- Cảm ơn
55
mù tin cũng biết nhập xuất chứ
- ttphulhp
- Chưa có nhóm
- Trả lời
913
- Điểm
17366
- Cảm ơn
515
- ttphulhp
- 15/01/2021
program oken;uses crt;var s:string; i,j,dem,k: longint; sl: array[1..1000000] of longint; a: array[1..1000000] of char;begin clrscr; write('Nhap xau: '); readln(s); k:=0; for i:=32 to 126 do begin dem:=0; for j:=1 to length(s) do if chr(i)=s[j] then dem:=dem+1; if dem<>0 then begin k:=k+1; a[k]:=chr(i); sl[k]:=dem; end; end; for i:=1 to k do writeln(a[i],': ',sl[i]); readln;end.
Hãy giúp mọi người biết câu trả lời này thế nào?
starstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarGửiHủy- Cảm ơn
- Báo vi phạm
Bạn muốn hỏi điều gì?
Đặt câu hỏiTham Gia Group Dành Cho 2K8 Chia Sẻ, Trao Đổi Tài Liệu Miễn Phí
Bảng tin
Bạn muốn hỏi điều gì?
Đặt câu hỏiLý do báo cáo vi phạm?
Gửi yêu cầu Hủy
Cơ quan chủ quản: Công ty Cổ phần Công nghệ Giáo dục Thành Phát
Tải ứng dụng
- Hướng dẫn sử dụng
- Điều khoản sử dụng
- Nội quy hoidap247
- Góp ý
- Inbox: m.me/hoidap247online
- Trụ sở: Tầng 7, Tòa Intracom, số 82 Dịch Vọng Hậu, Cầu Giấy, Hà Nội.
Từ khóa » Bài Toán Nén Xâu Trong Pascal
-
Nén Xâu Kí Tự
-
Xâu Thuần Nhất (Giải Nén Xâu Trong Pascal) - Tài Liệu Text - 123doc
-
Lập Trình Pascal, Giải Nén Xâu Ký Tự, Giai Nen Xau Ki Tu Bồi Dưỡng ...
-
Lập Trình Pascl Nén Xâu Kí Tự, Bồi Dưỡng HSG Môn Tin THCS
-
Giải Nén Xâu GNEN - Thầy Quách Văn Lượm
-
Viết Chương Trình Nhập Vào 1 Xâu Ký Tự (\(1< S\le255 ... - Hoc24
-
Giải Nén Xâu - Góc Tin Học
-
Xâu Thuần Nhất (Giải Nén Xâu Trong Pascal)
-
COMSTR - Nén Xâu - Bài Tập
-
Bài Tập Về Xâu Trong Pascal
-
[PDF] Chuyên đề Xử Lý Xâu
-
Bài Tập Dạy Học Sinh Giỏi Môn Tin Học THPT | Xemtailieu