private mand1_click() x1 = 2: x2 = 3 x = 2.5 do until abs(log(x) / log(10) - 1 / x) < 0.0001 doevents if log(x) / log(10) - 1 / x < 0 then x1 = x: x = (x1 + x2) / 2 else x2 = x: x = (x1 + x2) / 2 end if loop currentx = -4 currenty = 4 print x end sub private sub form_load() me.height = 8000: me.width = 8000 me.autoredraw = true me.scale (-5, 5)-(5, -5) line (0, -5)-(0, 5) line (-5, 0)-(5, 0) for i = -4 to 4 if abs(i) > 0 then line (i, 0)-(i, 0.1) currenty = currenty - 0.3 print i line (0, i)-(0.1, i) currentx = currentx - 0.5 print i end if next i for i = -5 to 5 step 0.001 if abs(i) > 0.01 then pset (i, 1 / i) next i for i = 0.001 to 5 step 0.001 pset (i, log(i) / log(10)) next i end sub
阿里云(aliyun)在这个月又推出了一个金秋上云季活动,到9月30日前,每天两场秒杀活动,包括轻量应用服务器、云服务器、云数据库、短信包、存储包、CDN流量包等等产品,其中Aliyun轻量云服务器最低60元/年起,还可以99元续费3次!活动针对新用户和没有购买过他们的产品的老用户均可参与,每人限购1件。关于阿里云不用多说了,国内首屈一指的云服务器商家,无论建站还是学习都是相当靠谱的。活动地址:h...
Friendhosting发布了针对“系统管理日”(每年7月的最后一个星期五)的优惠活动,针对VPS主机提供55%的优惠(相当于四五折),支持1-6个月付款使用,首付折扣非永久,优惠后最低套餐首半年7.18欧元起。这是一家保加利亚主机商,成立于2009年4月,商家提供VDS和独立服务器租用等,数据中心目前可选美国洛杉矶、保加利亚、乌克兰、荷兰、拉脱维亚、捷克和波兰等8个地区机房。下面以最低套餐为例...
乌云数据主营高性价比国内外云服务器,物理机,本着机器为主服务为辅的运营理念,将客户的体验放在第一位,提供性价比最高的云服务器,帮助各位站长上云,同时我们深知新人站长的不易,特此提供永久免费虚拟主机,已提供两年之久,帮助了上万名站长从零上云官网:https://wuvps.cn迎国庆豪礼一多款机型史上最低价,续费不加价 尽在wuvps.cn香港cera机房,香港沙田机房,超低延迟CN2线路地区CPU...