ERP测试面试编程题目(大家帮帮忙)

kewei1314

输入一行文字,找出其中大写字母,小写字母,空格,数字以及其他字符各是多少个?

yjc13

很容易呀！！！

mfkzhb

不明白！
学习中!

kewei1314

大家能不能写出来看看呀

kewei1314

要用到很多次循环啊,我这个最滥了,哎呀

jeamzhang

可以上网查资料就没问题，不查资料我写不出来。

vampirem

不会玩。。。

miffyduo

有内置函数的吧

kewei1314

我用C 写过,但是好象要用到ASCII转换,这一步我是真不会拉

JIAXIANGHONG

还搞不懂啊

b374aaa

一点思路：
用数组存字符串，然后循环判断
if(youstring[n] >= 'a' and youstring[n] <= 'z',i++,)
呵呵，好几年不写C了，也许有语法错误，见笑

[ 本帖最后由 b374aaa 于 2008-6-5 00:33 编辑 ]

印度阿三

要用到很多次循环啊,我这个最滥了,哎呀
===============================
一次應該就夠了

潜水山羊

'判断输入字符位数
        Dim sz, kg, xzm, dzm, qt, i As Integer
        If TextBox1.Text <> String.Empty Then
            For i = 0 To TextBox1.Text.Length - 1
                If CInt(Asc(TextBox1.Text.Substring(i, 1))) >= Asc("A") And CInt(Asc(TextBox1.Text.Substring(i, 1))) <= Asc("Z") Then
                    dzm += 1
                ElseIf CInt(Asc(TextBox1.Text.Substring(i, 1))) >= Asc("a") And CInt(Asc(TextBox1.Text.Substring(i, 1))) <= Asc("z") Then
                    xzm += 1
                ElseIf CInt(Asc(TextBox1.Text.Substring(i, 1))) >= Asc("0") And CInt(Asc(TextBox1.Text.Substring(i, 1))) <= Asc("9") Then
                    sz += 1
                ElseIf CInt(Asc(TextBox1.Text.Substring(i, 1))) = Asc(" ") Then
                    kg += 1
                Else
                    qt += 1
                End If
            Next
        End If
        Response.Write("大写字母：" & dzm & ",小写字母：" & xzm & ",数字：" & sz & ",空格：" & kg & ",其它：" & qt)

apple_xgz1015

我对编程一点儿也不懂,呵....

lxh_1763

ERP测试题目??? 这种题目用不同的开发工具其写法不一样,我个人一般倾向于出SQL语句的题目,毕竟ERP编程是对数据库的编程

[ 本帖最后由 lxh_1763 于 2008-10-6 10:51 编辑 ]

以梦为马

C来写。

pathwide

这是最基本的数据结构问题，还是多看看原理类的东西

xxj0625

兄弟没说用什么语言写的，
我用informix写下，晚上吧

river.li

//写成一个方法  source 是任意字符串
procedure SplitString(source:string);
var
  i, nCount, lCount, uCount, sCount, oCount: integer;  //变量声明
begin

  //***开始变量付初值
  nCount:=0;//记录数字个数
  lCount:=0;//记录小写字母个数
  uCount:=0;//记录大写字母个数
  sCount:=0;//记录空格个数
  oCount:=0;//记录其它字符个数
  //***付初值完成

  //***开始遍历字符串
  for i := 0 to length(source) - 1 do
  begin
    if (ord(source[ i ]) = 32) then sCount := sCount + 1
    else if ((ord(source[ i ]) >= 65) and (ord(source[ i ]) <= 90)) then uCount := uCount + 1
    else if ((ord(source[ i ]) >= 97) and (ord(source[ i ]) <= 122)) then lCount := lCount + 1
    else if ((ord(source[ i ]) >= 48) and (ord(source[ i ]) <= 57)) then nCount := nCount + 1
    else oCount := oCount + 1;
  end;
  //***遍历完成

  //***弹出窗口显示结果
  showmessage(' 数字个数:' + inttostr(nCount) +
    ' 小写字母个数:' + inttostr(lCount) +
    ' 大写字母个数:' + inttostr(uCount) +
    ' 空格个数:' + inttostr(sCount) +
    ' 其它字符个数:' + inttostr(oCount));
  //***结果浏览完成

end;
刚写的，Delphi运行通过。

[ 本帖最后由 river.li 于 2008-10-7 16:34 编辑 ]

shoyo2007

.........无语中.....