Việt Anh Đỗ
Hỏi từ APP VIETJACK
Cho một số nguyên dương k và một xâu kí tự S . Xâu S chỉ gồm các kí tự là các chữ cái Latinh từ ‘a’..’z’ và các chữ số từ ‘0’..’9’, trong đó có ít nhất k kí tự là chữ số.
Yêu cầu: Hãy xóa bỏ các kí tự cần thiết trong xâu S để k kí tự còn lại tạo thành một số có k chữ số và có giá trị nhỏ nhất, số tìm được đó cho phép có số 0 ở đầu.
Yêu cầu: Hãy xóa bỏ các kí tự cần thiết trong xâu S để k kí tự còn lại tạo thành một số có k chữ số và có giá trị nhỏ nhất, số tìm được đó cho phép có số 0 ở đầu.
Quảng cáo
1 câu trả lời 2383
uses crt;
var st:string;
i,d,dem:integer;
ch:char;
begin
clrscr;
write('Nhap xau:'); readln(st);
write('Nhap ki tu:'); readln(ch);
d:=length(st);
dem:=0;
while pos(ch,st)>0 do
begin
inc(dem);
delete(st,pos(ch,st),1);
end;
writeln(dem);
readln;
end.
Quảng cáo
Bạn cần hỏi gì?
Câu hỏi hot cùng chủ đề
-
Đã trả lời bởi chuyên gia
149403 -
Đã trả lời bởi chuyên gia
99825 -
Đã trả lời bởi chuyên gia
97429 -
Đã trả lời bởi chuyên gia
80097 -
Đã trả lời bởi chuyên gia
72927 -
Đã trả lời bởi chuyên gia
56019 -
Đã trả lời bởi chuyên gia
55389
Gửi báo cáo thành công!
