Pascal输入一串字符,结束,分别统计其中数字(0,1,2,.9)出现的次数

学习 时间:2026-03-30 09:12:48 阅读:3086
Pascal输入一串字符,结束,分别统计其中数字(0,1,2,.9)出现的次数用数组,排序与分类的作业.input输入文件只有一行,一‘?’借宿的一串字符.output输出文件共十行,没行输出俩证书,分别是数字和该数字在字符串中出现的次数多少,按降序排列,期间用一个空格隔开.输入样例a28455529A9B9c9762z66ob648y88u85c788805o9?输出样例8 85 59 56 42 34 27 20 11 03 0

最佳回答

勤奋的方盒

小巧的戒指

2026-03-30 09:12:48

程序很简单,仔细看吧:var a:array ['0'。。'9'] of longint; b:array ['0'。。'9'] of char; c,i,j,tt:char; t:longint;begin //初始化 for i:='0' to '9' do b[i]:=i; //读取字符 read(c); while c'?' do begin if (c>='0')and(c

最新回答共有2条回答

  • 安静的铅笔
    回复
    2026-03-30 09:12:48

    程序很简单,仔细看吧:var a:array ['0'。。'9'] of longint; b:array ['0'。。'9'] of char; c,i,j,tt:char; t:longint;begin //初始化 for i:='0' to '9' do b[i]:=i; //读取字符 read(c); while c'?' do begin if (c>='0')and(c

上一篇 三相发电机输出电流650A,电压400V,功率因素0.99;请问一天能输出多少KW.H?

下一篇 当地震发生时如果我们正在家里应该怎样避震