VB和C语言代码
发布时间：2020-12-16 22:15:56 所属栏目：大数据 来源：网络整理
导读：功能是根据三边求三角形面积，要求能反复输入。先写出C语言的： #include math.h #include stdio.h int main() { double area,a,b,c,s; char ch; ch='y'; while(ch=='y'||ch=='Y') { s=0; printf("请输入a,c:n"); scanf("%lf%lf%lf",a,b,c); if(a+b=c||b+c=
|
功能是根据三边求三角形面积，要求能反复输入。先写出C语言的：
#include <math.h>
#include <stdio.h>
int main()
{
double area,a,b,c,s;
char ch;
ch='y';
while(ch=='y'||ch=='Y')
{
s=0;
printf("请输入a,c:n");
scanf("%lf%lf%lf",&a,&b,&c);
if(a+b<=c||b+c<=a||a+c<=b)
{
printf("输入错误，是否重新输入？（是输入Y，否输入N。）");
scanf("%c",&ch);
}
else
{
s=(a+b+c)/2.0;
area=sqrt(s*(s-a)*(s-b)*(s-c));
printf("面积是%f。n",area);
printf("输入错误，是否重新输入？（是输入Y，否输入N。）");
scanf("%c",&ch);
}
}
getchar();
}
VB：
dim a as double,b as double,c as double
a=text1.text
b=text2.text
c=text3.text
if a+b>c and b+c>a and a+c>b then
s=(a+b+c)/2
area=sqr(s*(s-a)*(s-b)*(s-c))
label1.caption="三角形面积是：" & area & "。"
else
label1.caption="请重新输入。"
text1.text=""
text1.setfocus
text2.text=""
text3.text=""
end if
C语言花了好几天才达到VB的效果。还是VB的代码简单，但C语言灵活，更能深入底层。
（编辑：李大同） 【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容! |