亲测可完美执行，步骤如下：
1，增加一个TEXT文本框，增加一个command按钮；
2，复制代码：
Private Sub Command1_Click()
Dim a As Double
Dim b As Double
Dim c As Double
c = 3 3 - 4 1 2
If c > 0 Then
a = (-3 + c ^ (1 / 2)) / 2 1
b = (-3 - c ^ (1 / 2)) / 2 1
Text1Text = "结果一:" & a & "结果二:" & b
Else
Text1Text = "无根"
End If
End Sub
3，按运行即可
;
public class Sort{
public static void main(String[] args) {
Scanner sc = new Scanner(Systemin);
Systemoutprintln("请输入第一个字符：");
String str1 = scnext();
Systemoutprintln("请输入第二个字符：");
String str2 = scnext();
char c1 = str1charAt(0);
char c2 = str2charAt(0);
int asc1 = (int)c1;
int asc2 = (int)c2;
Systemoutprintln("第一个字符" + str1 + "的ascii码是：" + asc1);
Systemoutprintln("第二个字符" + str2 + "的ascii码是：" + asc2);
if(asc1 > asc2){
Systemoutprintln("大的是：" + str1);
}else{
Systemoutprintln("大的是：" + str2);
}
}
}
占位。 我去写一会儿。
interface I_Area {double getArea();
}
class Triangle implements I_Area{
private double sideA,sideB,sideC;
public Triangle(double sideA,double sideB,double sideC){
thissideA=sideA;
thissideB=sideB;
thissideC=sideC;
}
public void setSide(double sideA,double sideB,double sideC) {
thissideA=sideA;
thissideB=sideB;
thissideC=sideC;
}
public boolean isOrNotTrangle(){
if(sideA < 0 || sideB<0 || sideC<0){
return false;
}
if(sideA+sideB>sideC&&sideA+sideC>sideB&&sideB+sideC>sideA){
return true;
}
return false;
}
public double getArea() {
if(!isOrNotTrangle()){
return 0;
}
double m = ((double)(sideA+sideB+sideC))/2;
double s = Mathsqrt(m(m-sideA) (m-sideB) (m-sideC) );
return s;
}
}
class Circle implements I_Area{
private double r;
public Circle(double r){
thisr = r;
}
public double getArea() {
if(r<=0)return 0;
return (MathPI)Mathpow(r,2);
}
public void setR(double r) {
thisr = r;
}
}
public class E{
public static void main(String[] args) {
I_Area i1 = new Triangle(3d,4d,5d);
I_Area i2 = new Circle(12d);
Systemoutprintln("三角形面积："+i1getArea());
Systemoutprintln("圆形面积："+i2getArea());
}
}
#include<stdioh>
#define MP 5//学生人数 5
#define MS 4//科目门数 4
int main()
{
float sum1[MP]={0},sum2[MS]={0};
int i,j,scores[MP][MS];
for(i=0;i<MP;i++)
for(j=0;j<MS;j++)
scanf("%d",&scores[i][j]),sum1[i]+=scores[i][j],sum2[j]+=scores[i][j];
printf("每科平均成绩：\n");
for(i=0;i<MS;i++)
printf("%1f ",sum2[i]/MP);
printf("\n\n每为同学总成绩：\n");
for(i=0;i<MP;i++)
printf("%1f ",sum1[i]);
return 0;
}
asp开发一个简单的在线考试程序
脚本说明:
第一步:把如下代码加入<head>区域中
<SCRIPT LANGUAGE="JavaScript">
<!--
function scorequiz(form) {
list=0
if(formQ1value!=null && formQ1value=="") {list=list+1}
if(formQ2value!=null && formQ2value=="") {list=list+1}
if(formQ3value!=null && formQ3value=="") {list=list+1}
if(formQ4value!=null && formQ4value=="") {list=list+1}
if(formQ5value!=null && formQ5value=="") {list=list+1}
if(formQ6value!=null && formQ6value=="") {list=list+1}
if(formQ7value!=null && formQ7value=="") {list=list+1}
if(formQ8value!=null && formQ8value=="") {list=list+1}
if(formQ9value!=null && formQ9value=="") {list=list+1}
if(formQ10value!=null && formQ10value=="") {list=list+1}
formSCOREvalue =eval(list)
if (formSCOREvalue<=8){
ok="不及格！"}
}
function clearquiz(form) {
list=0
formQ1value=""
formQ2value=""
formQ3value=""
formQ4value=""
formQ5value=""
formQ6value=""
formQ7value=""
formQ8value=""
formQ9value=""
formQ10value=""
formSCOREvalue =eval(list)
}
function msg() {
alert("感谢参加测试，您的成绩已经将mail给Webmaster。")
}
// -->
</SCRIPT>
第二步:把如下代码加入<body>区域中
<table width="75%" border="0" align="center">
<tr>
<td>
<form name="quiz1"
action ="mailto:xiaoqinglu@263netsubject=测试结果反馈" method="post" enctype="text/plain"
onLoad="clearquiz(thisform)" onSubmit="msg()">
您的姓名:
<input type="Text" name="Name" value="" class="pt9">
<br>
<hr>
1 Internet上使用的网络协议是：__________
<ol>
<input type="radio" name="Q1" value="TCP/IP" onClick=Q1value="">
TCP/IP<br>
<input type="radio" name="Q1" value="X25" onClick=Q1value="X25">
X25<br>
<input type="radio" name="Q1" value="NetBEUI" onClick=Q1value="NetBEUI">
NetBEUI<br>
</ol>
2 我们通过__________长距离连接两台计算机使它们通讯。
<ol>
<input type="radio" name="Q2" value="LAN" onClick=Q2value="A">
LAN<br>
<input type="radio" name="Q2" value="WAN" onClick=Q2value="">
WAN<br>
<input type="radio" name="Q2" value="WAIS" onClick=Q2value="C">
WAIS<br>
</ol>
3 HUB是指：__________
<ol>
<input type="radio" name="Q3" value="网关" onClick=Q3value="网关">
网关<br>
<input type="radio" name="Q3" value="网桥" onClick=Q3value="网桥">
网桥<br>
<input type="radio" name="Q3" value="路由器" onClick=Q3value="路由器">
路由器<br>
<input type="radio" name="Q3" value="集线器" onClick=Q3value="">
集线器<br>
</ol>
4 56K MODEM的传输速度为：__________
<ol>
<input type="radio" name="Q4" value="56Kbytes" onClick=Q4value="A">
每秒传输56K bytes的数据。 <br>
<input type="radio" name="Q4" value="56kbps" onClick=Q4value="">
每秒传输56k bits的数据。 <br>
</ol>
5 Gateway是指：__________
<ol>
<input type="radio" name="Q5" value="网关" onClick=Q5value="">
网关<br>
<input type="radio" name="Q5" value="网桥" onClick=Q5value="B">
网桥<br>
<input type="radio" name="Q5" value="路由器" onClick=Q5value="C">
路由器<br>
<input type="radio" name="Q5" value="集线器" onClick=Q5value="D">
集线器<br>
</ol>
6 >
#include<stdioh>
int main(void)
{
int score=0;
printf("input score: ");
scanf("%d", &score );
if ( score >= 90 )
printf("优秀\n");
else if ( score >= 80 )
printf("良好\n");
else if ( score >= 70 )
printf("中等\n");
else if ( score >= 60 )
printf("及格\n");
else
printf("不及格\n" );
return 0;
}
以上就是关于vb编写程序 正在考试！！很简单，快来人啊。。。全部的内容，包括:vb编写程序 正在考试！！很简单，快来人啊。。。、请Java高手用Java编写一个程序，考试来的，以下是要求、按要求编写Java程序，期末考试，坐等大神！！！等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！
欢迎分享，转载请注明来源：内存溢出
微信扫一扫
支付宝扫一扫
评论列表（0条）