程序注释题:读程序,写出程序的功能,并为每一句程序进行注释#include<stdio.h> #in

#include<stdio.h>

#include<conio.h>

int n=6 

void fun(int *a,int *odd,int *even)

{

int i

*odd=0   //此行开笑桐始的2行，初始化奇数、偶数的总和为0

*even=0 

for(i=0i<ni++)    //扫描整个数组

{

if(*a%2==1) *odd=*odd+*a     //判薯梁断，若指针所指的元素为奇数，则加到*odd中

else *even=*even+*a     //否则，是偶数，则加到*even中

a++     //指针后移一位，准备处理下一个数

}

}

void main()

{

int a[6],i,odd,even

printf("please input the number to the array:")

for(i=0i<ni++)     //此行开始的2行，输入6个整数并存入数组a

scanf("%d",a+i)

printf("\nthe original data 数升运is:")    //此行开始的4行，输出提示及数组中的数

for(i=0i<ni++) 

printf("%5d",*(a+i))

printf("\n")

fun(a,&odd,&even)     //调用函数，统计数组中奇数及偶数的总和

printf("the sum of odd number:%d\n",odd)    //此行开始的2行，输出奇数及偶数的总和

printf("the sum or even number:%d\n",even)

}

一、

#include<stdio.h>

main(){

int a,b,sum,m,t//定义变量

double s//s为双精度型变量

a=8//给a赋值为8

b=3b赋值3

sum=a+bsum的值为a+b之和即11

m=a-bm=8-3=5

t=a*bt=8*3=24

s=(double)a/(double)b s=2.66666666666666

printf("\na=%d,b=%d,sum=%d,m=%d,t=%d,s=%lf",a,b,sum,m,t,s)；

输出结果为 a=8，b=3，sum=11，m=5,t=24，s=2.66666666666666

这段代码是基本的枝歼算术运算

第二段代码 输出为a=8，b=3，m=2，s=192.000000000000（S为双精度，共15位，不足用0补齐）

第三段代码 算圆柱体的体吵轮积 输出结果为r=2.50000000000000，h=3.50000000000000，v=68.6875000000000

第四段代码 与第三段代码一样 但是要输入r和h的值

第五段代码有问题 如果要求必须输入小写字母 在printf("\ninput char:")这句应该提示printf("\ninput char（请输入小写字母）:")或者在这句下面再加一句if（ch<97||ch>122）printf("\nERROE!")不然这段代码的功能就不是将小写字母转换为对应的大写字母 而只是将你输入的字符转换为在ASCII值减32后所得升搭信的那个ASCII值对应的字符。

第六段代码 输入三个字符 然后一行输出一个，最后一行输出BOY三个字母

第七段代码 输入两个数 输出较大的那个

第八段代码 输入三个数 输出最大值

Sub 计算()

Dim a As Integer '声明a为整形变量

a = Val(InputBox("请输入一整数a")) 'InputBox获取键盘输入的数字，Val将其转换为整型，赋值给a

If a >= 0 Then '如果a>=0 那么

a = a + 10

Else'否则

a = -a + 10

End If '结束IF语句

Sheet1.Activate '激活Sheet1

Cells(1, 1) = a '在Sheet1的第1行第1列的单元格值等于誉模塌a

End Sub '结束

1、15时结果=25

2、-5时结果=15

Sub color()

For k = 1 To 7 '定义FOR循环，k从1递加至7，每次加1

c = "庆圆A" &k'令c依次等于A1、A2、A3、A4、A5、A6、A7

Range(c).Select'选择c所代表的单元格，c中保存的值是单元格的地址

Selection.Interior.ColorIndex = k '设置每次选择的单元格的颜色码高，k做为颜色索引值，这样从A1到A7通过循环分别填充7种不同颜色

Next'下一循环，当k=7时结束

End Sub

---