输入一个英文句子,,找出最长单词 VB
来源:学生作业帮助网 编辑:作业帮 时间:2024/11/09 02:04:43
PrivateSubCommand1_Click()Dims$,i%,sMax$,sArr$()s=InputBox("任意输入一个英文句子","输入英文","Hello,thisisatestcom
求出的长度max没问题,问题在那个length的计算不对,lenth得到的是第几个单词,而不是在字符串中的位置.另外,你这个算法,复杂度太高了,对字符串一个循环就可以全部解决,你这个,做了两次循环不说
#include#includeintmain(){charstr[100];inti;gets(str);for(i=0;i
if(k==0&&a[i]122)这句有逻辑错误.a[i]不可能同时小于97和大雨122.后面那个&&应该是||.应该是这句引起的.
PrivateSubCommand1_Click()Dimstra()AsString,changduAsIntegerstra=Split(Text1.Text,"")Fori=LBound(str
给一个最粗糙的版本,能实现#includemain(){\x09charstr[50];\x09inti,len;\x09printf("inputasentence:\n");\x09gets(st
前面写错了,不好意思
主要问题在for(i=0;(c=a[i])!='\0';i++);这行的分号上,这里加了分号等于在这个循环中程序不执行任何操作!当然后面花括号中的语句也不会执行.还有个小问题,按你的写法,num的初值
#includevoidmain(){charx[100];inti;printf("请输入英语句子\n");gets(x);x[0]=x[0]-32;for(i=1;x[i]!='\0';i++){
在main函数中调用测字符串长度函数,用while(i='.')就结束读字符然后输出就好啦!给你思想,程序还是自己写.再问:啊、是指针题啊,函数调用还没有学过。。。再答:main(){inti;cha
呵呵,如果空格和标点符号严格的话,倒是很简单,如果稍微有些不严格的话,就需要仔细研究了.
PrivateSubCommand1_Click()IfText1.Text=""ThenExitSubDimwordAsVariant,sAsStringDimkAsInteger,maxwAsSt
我说,如果内个字母本来就是大写字母,就不需要转换了吧?大写字母-32成什么了==加两条if语句检测是不是大写字母就好了
Dimb()AsStringb()=Split(a,"")然后判断每一个b数组每一个数据的len即可
方法1限制单词长度:#include#include#includeintmain(){charc,*pstr;charszWord[16];while(1){pstr=szWord;while((c
英文引号没有方向(或者说只有一个方向)'a'"b",你可以换成中文输入法,就可以了‘一’“二”.
PrivateSubmaxlengthword(ByValstr1$,ByRefmaxword$)Dimi%Dimtemp$i=InStr(str1,"")maxword=""DoWhilei>0te
'不用这么复杂,你的代码太长没有看,如果一定用你的代码,我再给你修改一下OptionExplicitPrivateSubCommand1_Click()DimiAsLong,arr,nAsLongIf
vars:string;l,i:longint;beginreadln(s);{输入s字符串}l:=0;{l是A的个数,先清零}fori:=1tolength(s)do{length(s)是求s的长度
vars,z:string;i,j:longint;a:array[1..1000]ofinteger;beginreadln(s);readln(z);fillchar(a,sizeof(a),0)