1.编写程序,将用户输入的正整数转换成相应的星期值输出,如用户输入3,则输出Wednesday;用户输入0,则输出Sunday.如果用户输入的数大于6,则用这个数除以7所得的余数进行上述操作.2.一个球从100
来源:学生作业帮助网 编辑:作业帮 时间:2024/11/02 18:27:57
1.编写程序,将用户输入的正整数转换成相应的星期值输出,如用户输入3,则输出Wednesday;用户输入0,则输出Sunday.如果用户输入的数大于6,则用这个数除以7所得的余数进行上述操作.2.一个球从100
1.编写程序,将用户输入的正整数转换成相应的星期值输出,如用户输入3,则输出Wednesday;用户输入0,则输出Sunday.如果用户输入的数大于6,则用这个数除以7所得的余数进行上述操作.
2.一个球从100米高处自由落下,每次着地后又跳回到原高度的一半在落下,编写程序,球当它第十次着地时,
(1)向下的运动共经过多少米?
(2)第十次着地后反弹多高?
(3)全程共经过多少米?
是那种 有 INPUT PRINT IF DO 这种的、没有你们那么高级.
1.编写程序,将用户输入的正整数转换成相应的星期值输出,如用户输入3,则输出Wednesday;用户输入0,则输出Sunday.如果用户输入的数大于6,则用这个数除以7所得的余数进行上述操作.2.一个球从100
VB语言吧,怎么跑到C/C ++来了...
代码如下:
1、Private Sub Command1_Click()
t = InputBox("请输入一个正数")
t = t Mod 7
Select Case t
Case 0
Print "Sunday"
Case 1
Print "Monday"
Case 2
Print "Tuesday"
Case 3
Print "Wednesday"
Case 4
Print "Thursday"
Case 5
Print "Friday"
Case 6
Print "Saturday"
End Select
End Sub
2、Private Sub Command1_Click()
h = 100
Do Until i = 10
i = i + 1
h = h / 2
Loop
Print "第十次着地后反弹" & h & "米"
h = 100:s = 100:l = 100
Do Until n = 9
n = n + 1
h = h / 2
l = l + h
s = s + 2 * h
Loop
Print "向下的运动共经过" & l & "米"
Print "全程共经过" & s & "米"
End Sub