问题标题:
科学试验室在一次实验时得到了N个自然数,每个数不超过100,现在需要统计这些自然数出现的次数并按照从小到大的顺序输出统计结果.输入:59,71,85,62,38,43,29,89,5,38,47,79,47,83,2,83,95,97,47,79,46,67,11
问题描述:
科学试验室在一次实验时得到了N个自然数,每个数不超过100,现在需要统计这些自然数出现的次数
并按照从小到大的顺序输出统计结果.输入:59,71,85,62,38,43,29,89,5,38,47,79,47,83,2,83,95,97,47,79,46,67,11.用PASCAL语言,要快,谢谢!
陆枫回答:
varn,i,b:longint;
a:array[1..100]oflongint;
begin
read(n);
fori:=1tondo
begin
read(b);
inc(a[b]);
end;
fori:=1to100dowriteln(a[i]);
end.
点击显示
科学推荐
热门科学推荐