数学研发论坛

 找回密码
 欢迎注册
查看: 225|回复: 7

[反馈] 发代码出现以下问题

[复制链接]
发表于 2019-4-15 12:48:55 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有帐号?欢迎注册

x
一般回复不了,高级回复出现以下提示

宝塔网站防火墙

您的请求带有不合法参数,已被网站管理员设置拦截!

可能原因:

    您提交的内容包含危险的攻击请求
毋因群疑而阻独见  毋任己意而废人言
毋私小惠而伤大体  毋借公论以快私情
发表于 2019-4-15 14:34:56 | 显示全部楼层
……可能并不是代码的锅
网站的防火墙有时候会拦截一些回复
似乎,换一个帖子是可以回复的
……
防火墙智障点……也就这样吧
毋因群疑而阻独见  毋任己意而废人言
毋私小惠而伤大体  毋借公论以快私情
 楼主| 发表于 2019-4-15 15:45:18 | 显示全部楼层
  1. {x1, x2, x3, x4}/100
复制代码
毋因群疑而阻独见  毋任己意而废人言
毋私小惠而伤大体  毋借公论以快私情
 楼主| 发表于 2019-4-15 15:45:45 | 显示全部楼层
  1. //{Plus@@#,Times@@#}&//({#//Factor,Round[7.11,10^-2]}//(PolynomialGCD@@#)^-1 #&//Last)&/@#&
复制代码
毋因群疑而阻独见  毋任己意而废人言
毋私小惠而伤大体  毋借公论以快私情
 楼主| 发表于 2019-4-15 15:46:14 | 显示全部楼层
  1. //{Prepend[#,{0}]}&//Nest[(Function[{u},Select[Divisors[u[[3]]],#<=u[[2]]/2\[And]#<=Sqrt[u[[3]]]\[And]#>=u[[1,-1]]&]//{Append[u[[1]],#],u[[2]]-#,u[[3]]/#}&/@#&]/@#//Join@@#&//Union)&,#,3]&
复制代码
毋因群疑而阻独见  毋任己意而废人言
毋私小惠而伤大体  毋借公论以快私情
 楼主| 发表于 2019-4-15 15:46:30 | 显示全部楼层
  1. //Select[#,#[[2]]==#[[3]]&]&//(Append[#[[1,2;;-1]],#[[2]]])&/@#&//Union//N[#/100]&
复制代码
毋因群疑而阻独见  毋任己意而废人言
毋私小惠而伤大体  毋借公论以快私情
 楼主| 发表于 2019-4-15 15:46:54 | 显示全部楼层
分开发完成了。
毋因群疑而阻独见  毋任己意而废人言
毋私小惠而伤大体  毋借公论以快私情
 楼主| 发表于 2019-4-15 15:48:57 | 显示全部楼层
.·.·. 发表于 2019-4-15 14:34
……可能并不是代码的锅
网站的防火墙有时候会拦截一些回复
似乎,换一个帖子是可以回复的

先发一段接着编辑就绕开了
毋因群疑而阻独见  毋任己意而废人言
毋私小惠而伤大体  毋借公论以快私情
您需要登录后才可以回帖 登录 | 欢迎注册

本版积分规则

小黑屋|手机版|数学研发网 ( 苏ICP备07505100号 )

GMT+8, 2019-6-25 10:03 , Processed in 0.067346 second(s), 16 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表