Question

请帮忙将下面C语言代码转换为Vb代码！！急求谢谢🙏

#include<stdio.h>
void create(){
FILE *fout;
fout = fopen("111.txt","w");
if (!fout){printf("Can not create file 111.txt"); exit(0);};
fprintf(fout,"%s","12 23 44 68 95 68 47 95 10 25");
fclose(fout);
printf("111.txt created\n");
}
int main()
{
FILE *fin;
int a[10],i;
int max= -999;
fin = fopen("111.txt","r"); // 若手工建立 111.txt 则去掉这句
if (!fin) create(); // 若手工建立 111.txt 也去掉这句
fin = fopen("111.txt","r"); //打开文件
for (i=0;i<9;i++) fscanf(fin,"%d",&a[i]); //读入第一到第九个数
for (i=2;i<9;i++)if (a[i]%2 == 0 ) { max = a[i]; break;}; //从第三个数起找偶数
if (max == -999) {printf("no even value\n"); return 1;}; //若没有偶数，则结束
for (i=2;i<9;i++)if (a[i]%2==0 && a[i]>max) max = a[i]; //若有偶数，则找最大的
printf("max = %d\n", max); //输出最大的偶数
return 0;
}

Answer 1

牵牛花长的很独特就像一个个可爱的小喇叭。虽然它不像玫瑰花那样艳丽，也不像牡丹花那样高贵，可它的美还是有灵性的
6 404

热心网友
2019-10-11
矿泉水有30毫升，果汁有25ml，矿泉水比果汁多几毫升？你们可以按照这个数学题，然后用列数字、作比较的方法。描写这个事物。
1 85

热心网友
2020-03-17
牵牛花长的很独特就像一个个可爱的小喇叭。虽然它不像玫瑰花那样艳丽，也不像牡丹花那样高贵，可它的美还是有灵性的
0 28

米线跨摸摸
LV.12020-03-31
关注
牵牛花长得很独特就像一个个小喇叭。虽然它不像玫瑰那样艳丽，也不像牡丹那样高贵，可她的美还是有灵性的。
0 5

怀念式籽
LV.152016-01-03
关注
不对哈应该是一端摆一端不摆就是30剩以2除20
追问追答
1 43

热心网友
2020-02-29
秦兵马俑中面积达19120平方米，足有两个半篮球场那么大。
1 30
更多回答（7）

百度APP
有事搜一搜 没事看一看
立即下载
为您推荐