2024年9月编写一个随机抽奖程序（VB设计一个随机抽奖程序，当单击开始按钮时，在两个文本框产生【1，20】之间的随机整数）
⑴编写一个随机抽奖程序（VB设计一个随机抽奖程序，当单击开始按钮时，在两个文本框产生【，】之间的随机整数
⑵VB设计一个随机抽奖程序，当单击开始按钮时，在两个文本框产生【，】之间的随机整数
⑶假定开始按钮是mand，两个文本框分别是Text、TextPrivateSubmand_Click()RandomizeText.Text=Int(Rnd*)+Text.Text=Int(Rnd*)+EndSub
⑷vb编写一个抽奖程序
⑸mand用来随机抽取，text显示text用来自己输入mand用来判断基本思想：假设连续有a位相同，经过验证如果为真则得出结果，如果为假，则假设a=a-位相同……直到a=也可以自己输入text数据来检验程序这段程序不局限于位数PrivateSubmand_Click()Dima$,b$,i%,j%,k%a=CStr(Text)b=CStr(Text)Fori=Len(a)ToStep-Forj=ToLen(a)-i+IfMid(a,j,i)=Mid(b,j,i)Thenk=iExitForEndIfNextIfk《》ThenExitForNextPrintk,Mid(a,j,i)’输出相同位数和相同数字Iflen(a)+-k》ThenMsgBox“对不起，无奖项“ElseMsgBoxLen(a)+-k&“等奖“’判断奖项EndIfEndSubPrivateSubmand_Click()a=CStr(Text)Text=^(Len(a)-)+Int(Rnd*.*^Len(a))EndSub
⑹VB编写一个抽奖小程序，要求每次抽奖的数字不重复
⑺Dim?n?As?IntegerDim?a()Private?Sub?mand_Click()????If?n?=??Then????????????’第一次点击时执行????????m?=?Val(Text)????????ReDim?a(?To?m)????????For?i?=??To?m??????’生成数组a，元素为至m这m个数????????????a(i)?=?i????????Next????????For?i?=??To?m?-??????????????’随机打乱数组a中元素????????????r?=?Int(Rnd?*?m?+?)????????????tmp?=?a(i)????????????a(i)?=?a(r)????????????a(r)?=?tmp????????Next????End?If????n?=?n?+??????????????????’计数点击次数????If?n?》?Val(Text)?Then????’次数超过指定次数，抽奖结束????????MsgBox?“抽奖结束！“????????Exit?Sub????End?If????Text?=?a(n)??????????????’从数组中抽出第n个数，由于数组中是随机排列，所以相当于生成一个随机数，并且不会重复End?Sub
⑻C语言根据随机数编写一个抽奖程序
⑼#include《stdio.h》#include《conio.h》#include《stdlib.h》#include《memory.h》#include《string.h》#include《time.h》#defineAWARDER_NUMtypedefstructtag_award{charID;charname;chartelNo;charaddress;}AWARDER;AWARDER*awarder=newAWARDER;intfirst_award={-};intsecond_award={-,-};intthird_award={-,-,-,-,-};intawarder_num=;voidinfo_login(){if(awarder_num》=AWARDER_NUM){AWARDER*new_awarder=newAWARDER;memcpy(new_awarder,awarder,awarder_num*sizeof(AWARDER));deleteawarder;awarder=new_awarder;}printf(“身份证号：“);scanf(“%s“,awarder.ID);printf(“姓名：“);scanf(“%s“,awarder.name);printf(“电话号码：“);scanf(“%s“,awarder.telNo);printf(“家庭住址：“);scanf(“%s“,awarder.address);awarder_num++;}voidinfo_delete(){charname;printf(“输入您要删除的抽奖者的姓名：“);scanf(“%s“,name);for(inti=;i《awarder_num;i++){if(strcmp(awarder.name,name)==){printf(“您选择删除的抽奖者的信息如下：
⑽“);printf(“身份证号：%s
⑾“,awarder.ID);printf(“姓名：%s
⑿“,awarder.name);printf(“电话号码：%s
⒀“,awarder.telNo);printf(“家庭住址：%s
⒁“,awarder.address);break;}}if(i==awarder_num){printf(“没有找到您输入的抽奖者！
⒂“);}else{charc;printf(“您确定要删除吗？(Y//N)“);fflush(stdin);scanf(“%c“,&c);if(c==’Y’||c==’y’){AWARDER*new_award=newAWARDER;if(i《=)memcpy(new_award,awarder+,sizeof(AWARDER)*(awarder_num-));elseif(i》=awarder_num-)memcpy(new_award,awarder,sizeof(AWARDER)*(awarder_num-));else{memcpy(new_award,awarder,sizeof(AWARDER)*i);memcpy(new_award+i,awarder+i+,sizeof(AWARDER)*(awarder_num-i-));}awarder_num--;deleteawarder;awarder=new_award;}}}voidinfo_modify(){charname;printf(“输入您要修改的抽奖者的姓名：“);scanf(“%s“,name);for(inti=;i《awarder_num;i++){if(strcmp(awarder.name,name)==){printf(“您选择的抽奖者的信息如下：
⒃“);printf(“身份证号：%s
⒄“,awarder.ID);printf(“姓名：%s
⒅“,awarder.name);printf(“电话号码：%s
⒆“,awarder.telNo);printf(“家庭住址：%s
⒇“,awarder.address);break;}}if(i==awarder_num){printf(“没有找到您输入的抽奖者！
⒈“);}else{printf(“请输入该抽奖者的新信息：
⒉“);printf(“身份证号：“);scanf(“%s“,awarder.ID);printf(“姓名：“);scanf(“%s“,awarder.name);printf(“电话号码：“);scanf(“%s“,awarder.telNo);printf(“家庭住址：“);scanf(“%s“,awarder.address);}}boolcheck_over(intcur_award,intawarderNo){if(awarderNo==){if(cur_award==first_award)returntrue;}elseif(awarderNo《=){if(cur_award==first_award)returntrue;for(inti=;i《awarderNo-;i++)if(cur_award==second_award)returntrue;}elseif(awarderNo《=){if(cur_award==first_award)returntrue;for(inti=;i《;i++)if(cur_award==second_award)returntrue;for(i=;i《awarderNo-;i++)if(cur_award==third_award)returntrue;}returnfalse;}voidaward(){if(awarder_num《){printf(“人数太少，请添加足够的人再抽奖！
⒊“);return;}srand((long)time());charhit_id;printf(“
⒋开始抽第一等奖（名，按任意键开始...
⒌“);getch();while(!kbhit()){first_award=rand()%awarder_num;memcpy(hit_id,awarder.ID,);printf(“
⒍“);printf(“
⒎%s“,hit_id);}printf(“
⒏开始抽第二等奖（名“);for(inti=;i《;i++){printf(“
⒐第%d个二等奖,按任意键开始...
⒑“,i+);getch();while(!kbhit()){second_award=rand()%awarder_num;while(check_over(second_award,+i))second_award=rand()%awarder_num;memcpy(hit_id,awarder.ID,);printf(“
⒒“);printf(“
⒓%s“,hit_id);}}printf(“
⒔开始抽第三等奖（名“);for(i=;i《;i++){printf(“
⒕第%d个三等奖,按任意键开始...
⒖“,i+);getch();while(!kbhit()){third_award=rand()%awarder_num;while(check_over(third_award,+i))third_award=rand()%awarder_num;memcpy(hit_id,awarder.ID,);printf(“
⒗“);printf(“
⒘%s“,hit_id);}}}voidinfo_show(){printf(“一等奖获得者：
⒙“);printf(“ 身份证号：%s
⒚“,awarder.ID);printf(“ 姓名：%s
⒛“,awarder.name);printf(“ 电话号码：%s
“,awarder.telNo);printf(“ 家庭住址：%s
“,awarder.address);printf(“二等奖获得者：
“);for(inti=;i《;i++){printf(“第%d个二等奖获得者：
“);printf(“ 身份证号：%s
“,awarder.ID);printf(“ 姓名：%s
“,awarder.name);printf(“ 电话号码：%s
“,awarder.telNo);printf(“ 家庭住址：%s
“,awarder.address);}printf(“三等奖获得者：
“);for(inti=;i《;i++){printf(“第%d个三等奖获得者：
“);printf(“ 身份证号：%s
“,awarder.ID);printf(“ 姓名：%s
“,awarder.name);printf(“ 电话号码：%s
“,awarder.telNo);printf(“ 家庭住址：%s
“,awarder.address);}}/*提示信息*/boolraise(){printf(“
请输入你需要的操作代号：
“);printf(“ .录入：完成抽奖者信息的输入;
“);printf(“ .删除：完成抽奖者信息的删除;
“);printf(“ .修改：允许对已经录入的数据重新进行、修改;
“);printf(“ .抽奖：开始抽奖！
“);printf(“ .显示：显示所有中奖者的信息;
“);printf(“ .退出。
“);printf(“==》“);intoperate;fflush(stdin);scanf(“%d“,&operate);switch(operate){case:info_login();break;case:info_delete();break;case:info_modify();break;case:award();break;case:info_show();break;case:returnfalse;default:break;}printf(“
“);returntrue;}voidmain(){while(raise());}
用c语言编写一个简易的抽奖程序，
用data.txt文件保存以下内容：李桂荣李二来张荣刚荣南王三吴立郭德纲周星驰张曼玉张艺谋秦香莲潘金莲李大嘴展堂//源代码如下#include《stdio.h》#include《stdlib.h》#include《time.h》#defineMAX_NUM//定义保存人名和电话的数据结构structPerson{charname;chartelno;charaward;};intnum=;//统计人数FILE*fp;//文件指针Personpersons;//定义数组intawarder_={-};//一等奖intawarder_={-,-};//二等奖intawarder_={-,-,-,-,-};//三等奖//读取文件voidreaddata(){inti=;//数组下标Personperson;//文件打开fp=fopen(“data.txt“,“r“);if(fp==NULL){printf(“打开文件data.txt失败!
“);return;}//当文件不为空while(!feof(fp)){num++;fscanf(fp,“%s“,person.telno);fscanf(fp,“%s“,person.name);person.award=’F’;persons=person;}}//初始化标识voidinit(){for(inti=;i《num;i++){persons.award=’F’;}}//显示单个中奖信息voidinfo(inti){printf(“手机号码:%s姓名:%s
“,persons.name);}voidmain(){charagain=’Y’;//读取文件readdata();printf(“简单抽奖程序
“);srand((long)time());while(again==’Y’||again==’y’){//初始化标识init();printf(“
开始抽第一等奖(名)，按任意键开始...
“);getchar();awarder_=abs(rand()%num);while(persons.award==’T’){awarder_=rand()%num;}persons.award=’T’;info(awarder_);printf(“
开始抽第二等奖(名)
“);for(inti=;i《;i++){printf(“
第%d个二等奖,按任意键开始...
“,i+);getchar();awarder_=rand()%num;while(persons.award==’T’){awarder_=rand()%num;}persons.award=’T’;info(awarder_);}printf(“
开始抽第三等奖(名)
“);for(i=;i《;i++){printf(“
第%d个三等奖,按任意键开始...
“,i+);getchar();awarder_=rand()%num;while(persons.award==’T’){awarder_=rand()%num;}persons.award=’T’;info(awarder_);}printf(“
是否重新开始抽奖?(YorN)...
“);again=getchar();}getchar();return;}
C语言程序设计——编写一个抽奖程序,生成-之间的随机数，猜对了奖励块钱，没中奖显示中奖号码
代码如下，已测试通过：
int?main(){int?no,ret;printf(“请输入你猜测的号码：
“);scanf(“%d“,&no);ret=rand()%;printf(“本次开奖结果=：
“,ret);if(no==ret){printf(“恭喜你猜中了，中奖元！
“);}else{printf(“很遗憾，再来一次吧！
“);}return?;}
可以把上面代码改成多次输入，即将输入和取随机数都放在while循环中。自己修改下吧
怎样用C#制作一个随机数抽奖的程序
提供一个思路给你，你可以把抽奖号添加到一组数列里，一般使用数据库存储，并且自动编排号码。使用随机数random函数随机-你的号码数量，获得这个号码的排位数，即为获奖号码。
python编程编写程序自动生成到间的一个随机数，然后让参与者输入昵称和数字，最后判断谁猜得最准
#!/usr/bin/python#-*-coding:utf--*-“““author:Storm_duckfile?:-.pytime?://:““““““猜数字，看谁猜的最接近“““importrandomdefget_abs(rannum,ansnum):returnabs(ansnum-rannum)if__name__==“__main__“:num=random.randint(,)adic={}lens=whileTrue:choice=input(“What’syourname?,entertoquit:“)ifchoice==“enter“:breakifchoice!=“enter“:answer=int(input(“What’syourguess(-):“))lens+=ifchoiceinadic.keys():adic=answerelse:adic.setdefault(choice,answer)newlist=sorted(adic.items(),key=lambdakv:get_abs(num,kv),reverse=False)ifnewlist:ifnum==newlist:print(“{}厉害,数字就是{}：“.format(newlist))else:print(“数字是{},猜的最接近的是：{}“.format(num,newlist))else:temp=alist=list(zip(*newlist))t=alistforiinrange(alist.count(t)):temp.append(newlist)astr=“,“.join(temp)ifnum==t:print(“{}都比较厉害,数字就是{}：“.format(astr,num))else:print(“数字是{},{}的答案相同，猜的最接近。“.format(num,astr))
如何用python编写一个从随机数表~中抽取三个样本的随机数程序
importrandom
#定义一个空的数组，用作取样表
foriinrange(,):
reList.append(i)
#使用sample方法，取个随机数
res=random.sample(reList,k=)
print(“三个随机数是：{}“.format(res))
块石头两个人轮流随机取-块，谁取到最后一块谁赢python写小程序
#甲乙两人取石头，甲先取importrandoms=count=whiles《:i=random.randint(,)s=s+icount+=print(s,’→’,end=““)ifcount%==:print(’乙赢’)else:print(’甲赢’)