Hãy luôn nhớ cảm ơn và vote 5*
nếu câu trả lời hữu ích nhé!
var n,i: longint;
a: array [65..90] of longint;
s: ansistring;
begin
assign(INPUT,'XEPCHU.INP'); reset(INPUT);
assign(OUTPUT,'XEPCHU.OUT'); rewrite(OUTPUT);
readln(n);
readln(s);
For i:= 1 to n do
inc(a[ord(s[i])]);
For i:= 65 to 90 do
If a[i] <> 0 then writeln(chr(i),a[i]);
end.
Hãy giúp mọi người biết câu trả lời này thế nào?
Sự kiện
1912
42693
1607
dùng mảng đánh dấu à
715
17382
320
Mình dùng mảng để lưu số lần xuất hiện của các chữ số từ A đến Z.
1
150
1
@uyenvu33 giúp mik bài này vs ạ
715
17382
320
Bài nào vậy.
1912
42693
1607
mik giúp cho đang đợi giải nhất môn tin học cấp tỉnh về này @@
1
150
1
https://hoidap247.com/cau-hoi/5710006
1
150
1
đấy ạ
1
150
1
giúp di mà @bestanhvan :((