runningman参加过几次梦想杯,分别都是那几期，谢谢。
总共三次，12年开始到14年每年都参加！
E97 120603 朴智星特辑（下）－选拔大赛
嘉宾：朴智星、李智恩（郑大世、费迪南德特别出演）
前半部分------任务：寻找SPY
SPY：朴智星、刘在石
任务携带者：宋智孝
胜利者：SPY（朴智星、刘在石）
后半部分------队员选拔
选取队员：金钟国、Gary
E154 130714 亚洲梦想杯（上海）
嘉宾：朴智星、埃夫拉、崔雪莉（f(x)）
朴队：朴智星、刘在石、Gary、HAHA、崔雪莉
埃队：埃弗拉、金钟国、李光洙、池石镇、宋智孝（胜利）
朴队选拔：刘在石、HAHA
埃队选拔：金钟国、李光洙
E199 140608 2014 RM世界杯特辑（上）
嘉宾：朴智星、车范根、李昶旻(2AM)、尹斗俊&梁耀燮&李起光(Beast)、金桐俊(ZE:A)、Baro(B1A4)、
Leo(VIXX)、李旼赫(BTOB)
朴智星队：朴智星、刘在石、池石镇、金钟国、Gary、HaHa、宋智孝、李光洙
偶像队：李昶旻、尹斗俊、梁耀燮、李起光、Leo、旼赫、金桐俊、Baro（胜利）
E200 140615RM世界杯特辑（下）
2013年梦想亚洲杯为什么有明星
2013年亚洲梦想杯足球友谊赛
上海老克勒队迎战朴智星朋友队的比赛在上海虹口体育场打响，经过90分钟比赛，朴智星朋友队依靠朴智星本人和在葡超马里蒂莫队效力的石炫俊的进球，以2比0战胜上海老克勒队。
由于比赛邀请到了鸟叔、Running Man、偶像组合EXO-M等韩国艺人到场帮助阵，引发韩流粉丝到场观战，虹口足球场上座率达到23800多人，创造了德罗巴走后该球场上座新高。
2016年北京市青少年足球比赛什么时候开始
“北京市中小学生足球联赛”是北京市教委系统年度传统赛事，是历年最重要的、规模最大的校园足球比赛。其他的赛事，至少在北京市中小学中规模、参与度、重视程度、影响力都远低于联赛。
2016~2017年度的“北京市中小学生足球联赛”是2016年10月开始的，这届联赛的主办机关实际上还是教委，但对外宣布的主办单位规格上高了一级（你懂得）是：北京市青少年校园足球工作领导小组，承办方是著名的北京向上体育俱乐部和人大附中三高足球俱乐部承办。
这届联赛挺像模像样的，采用升降级制度，跨年度赛事，包括高中男子A组、高中男子B组、初中男子A组、初中男子B组、中学女子组、小学男子甲A组、小学男子甲B组、小学男子乙组、小学女子组9个组别。
其实组别多，对参赛球队技战术水平匹配更科学，对于足球人才培养和运动队建设更具有层次性。北京市少年宫还提供的一个官微平台，叫【体育组】，所有教练、领队都会从这里了解赛事安排和赛果。对了，这届联赛在规模上创历年最大，全市16个区400支中小学的校足球队近6000名学生参加比赛。
2013亚洲梦想杯谁胜了
2013亚洲梦想杯朴智星朋友队2：0击败了上海老克勒明星队。
北京时间6月23日下午三点，2013年亚洲梦想杯足球友谊赛-上海老克勒队迎战朴智星朋友队的比赛在上海虹口体育场打响，经过90分钟的友好切磋，朴智星朋友队依靠朴智星本人在第73分钟的进球，以及在葡超马里蒂莫队效力的石炫俊第88分钟的进球，以2比0战胜上海老克勒队。本场比赛多名韩国明星登场亮相，搞笑艺人刘在石在第77分钟主罚点球中柱弹出，而EXO-M的中国艺人鹿晗本场代表老克勒队出战，他曾有一次单刀得分机会，但射门被对方门将用腿扑出。
这次的亚洲梦想杯是中国队赢了还是韩国队？
实验30•(2) 编写计算关于 x和y变量的函数式子 的程序（其中x=5，y=9）。–(x ^ 3 + x * y + y ^ 3) / (2 * x * y)•(3) 编写计算y=ln20+|x-16|的程序。–Math.Log(20) + Math.Abs(x - 16)•(4) 编写计算y=0.231x+1.36值的程序。–0.231 * x + 1.36•(5)一个物体做斜抛运动，设初速度为v0，斜抛方向与地面夹角为θ，落地时所用的时间 ，落地时物体运动的射程 （其中重力加速度g=9.81米/秒2，θ的单位为：弧度）。编写程序，计算它落地所需时间和落地时运动的射程。要求：①用InputBox函数输入初速度为v0和角度θ（单位为：度）；②在程序中，重力加速度g定义为符号常量。– t = 2 * x * Math.Sin(y * Math.PI / 180) / g–s = x * Math.Sin(2 * y * Math.PI / 180) / g•(4) 用IF…THEN…ELSEIF…ENDIF语句编写根据成绩，给出等级的程序。等级划分如下：•90分以上 A •80-89分 B•70-79分 C•60-69分 D60分以下 Fdaan: Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click '用实验30-1-（1） Dim a As String, b As String, c As String Dim x1 As Single, x2 As Single a = InputBox("输入A", "输入据Y", , 500, 500) b = InputBox("输入B", "输入数据Y", , 500, 500) c = InputBox("输入C", "输入数据Y", , 500, 500) x1 = -b + Math.Sqrt(b ^ 2 - 4 * a * c) / 2 / a x2 = -b - Math.Sqrt(b ^ 2 - 4 * a * c) / 2 / a MsgBox("x1=" & Format(x1, "###.###") & " x2=" & Format(x2, "###.###")) End Sub Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click '实验30-1-（2） Dim x, y As Integer, z As Single x = 5 : y = 9 z = (x ^ 3 + x * y + y ^ 3) / (2 * x * y) MsgBox("(x ^ 3 + x * y + y ^ 3) / (2 * x * y)=" & z) End Sub Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click '实验30-1-（3） Dim x, y As Single x = InputBox("输入数值x") y = Math.Log(20) + Math.Abs(x - 16) MsgBox("ln20+|x-16|=" & y) End Sub Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click '实验30-1-（4） Dim x, y As Single x = InputBox("输入数值x") y = 0.231 * x + 1.36 MsgBox("0.231 * x + 1.36=" & y) End Sub Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click '实验30-1-（5） Dim x, y, t, s As Single Const g = 9.81 x = InputBox("输入初速度x") y = InputBox("输入斜抛方向与地面的夹角y") t = 2 * x * Math.Sin(y * Math.PI / 180) / g s = x * Math.Sin(2 * y * Math.PI / 180) / g MsgBox("落地使用的时间t=" & t & "秒 落地时物体运动的射程s=" & s & "米") End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click '用IF-Then语句编写奇偶数 Dim x As Integer 'Randomize '初始化随机数生成器 x = Int(Microsoft.VisualBasic.Rnd() * 100) If Int(x / 2) = x / 2 Then '判断数是否奇偶。用2除该数，该数取整等于其不取整的结果即为偶数。 MsgBox(x & "是偶数") Else MsgBox(x & "是奇数") End If End Sub Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click '在3个数中找出最大值和最小值 Dim x As Single, y As Single, z As Single, max_num As Single, min_num As Single x = InputBox("请输入第一个数") y = InputBox("请输入第二个数") z = InputBox("请输入第三个数") max_num = x : min_num = x If y > max_num Then max_num = y If z > max_num Then max_num = z If y < min_num Then min_num = y If z < min_num Then min_num = z MsgBox("最大数是 " & max_num & " 最小数是 " & min_num) End Sub Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click '用IF-Then-Else-Endif 编写变量t分段求值的计算程序 Dim t As Integer, f As Single t = Val(InputBox("请输入 t值（∞，120)或者[120,∞）：", "输入自变量tz值")) If t < 120 Then f = 0.06 * t + 2 Else f = 0.06 * t * 0.85 End If MsgBox(" f= " & f) End Sub Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click '用IF-Then-Else-Endif 编写成绩等级评定程序 Dim grade As Integer grade = InputBox("请输入您的考试成绩", , , 500, 500) If grade > 90 Then MsgBox("您的考试成绩为A级") ElseIf grade >= 80 Then MsgBox("您的考试成绩为B级") ElseIf grade >= 70 Then MsgBox("您的考试成绩为C级") ElseIf grade >= 60 Then MsgBox("您的考试成绩为D级") Else MsgBox("您的考试成绩为F级") End If End Sub
