①某系统通过用户视频点播的基础数据如评分、播放、快进等,分析计算出用户可能喜爱的影片,并为他提供定制化的推荐
②某网站通过追踪用户在其网络的行为,识别用户在它的网络中的好友,从而给出新的好友推荐建议
③某交通流量数据公司依靠分析历史和实时路况数据,能给出及时的路况报告,以帮助司机避开正在堵车的路段,并且帮他们提前规划好行程
④某保险公司天都会对美国境内超过100万个地点、未来两年的天气情况进行超过1万次模拟,而后将根系结构和土壤孔隙度的相关数据,与模拟结果相结合,为成千上万的农民提供农作物保险
①计算机设备②网络服务器③网络打印机④通信线路和连接设备⑤网络协议⑥操作系统
① 已知5个电阻阻值,求它们并联后的阻值
② 求某个同学期中考试各科成绩总分
③ 求某个班级期中考试某门科目的最高成绩
④ 根据三个系数a、b、c的值,求一元二次方程ax2+bx+c=0的解
a[1] | a[2] | a[3] | a[4] | a[5] | a[6] | a[7] | a[8] |
2 | 3 | 5 | 9 | 19 | 23 | 29 | 35 |
d[1] | d[2] | d[3] | d[4] | d[5] | d[6] | d[7] | d[8] |
206 | 216 | 210 | 222 | 218 | 208 | 220 | 202 |
Private Sub Command1_Click()
Dim n as integer, i as integer,s as double
n=val(inputbox("请输入n的值"))
s=0:i=1
do while ①
②
i=i+1
Loop
s= ③
Print s
End Sub
① ②