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
RFCHOST,这个服务商我们可能有一些朋友知道的。不要看官网是英文就以为是老外服务商,实际上这个服务商公司在上海。我们实际上看到的很多商家,有的是繁体,有的是英文,实际上很多都是我们国人朋友做的,有的甚至还做好几个品牌域名,实际上都是一个公司。对于RFCHOST商家还是第一次分享他们家的信息,公司成立大约2015年左右。目前RFCHOST洛杉矶机房VPS正进行优惠促销,采用CN2优化线路,电信双...
今天9月10日是教师节,我们今天有没有让孩子带礼物和花送给老师?我们这边不允许带礼物进学校,直接有校长在门口遇到有带礼物的直接拦截下来。今天有看到Friendhosting最近推出了教师节优惠,VPS全场45折,全球多机房可选,有需要的可以看看。Friendhosting是一家成立于2009年的保加利亚主机商,主要提供销售VPS和独立服务器出租业务,数据中心分布在:荷兰、保加利亚、立陶宛、捷克、乌...
农历春节将至,腾讯云开启了热门爆款云产品首单特惠秒杀活动,上海/北京/广州1核2G云服务器首年仅38元起,上架了新的首单优惠活动,每天三场秒杀,长期有效,其中轻量应用服务器2G内存5M带宽仅需年费38元起,其他产品比如CDN流量包、短信包、MySQL、直播流量包、标准存储等等产品也参与活动,腾讯云官网已注册且完成实名认证的国内站用户均可参与。活动页面:https://cloud.tencent.c...