用Mathematica判定简单命题

 时间:2026-02-13 09:14:33

1、判定简单的等式或者比较数字的大小,可以直接输入式子:

Sqrt[2]<2

用Mathematica判定简单命题

2、比较123^321和456^123的大小:

123^321>456^123

用Mathematica判定简单命题

3、如果要比较一系列数字与0的大小,可以这样:

If[# < 0,对,错] & /@ {1, 2,-3, 0, -5, 6,-7}

但是,复数不能比较大小:

If[# < 0,对,错] & /@ {6,-3,0,I+1}

用Mathematica判定简单命题

用Mathematica判定简单命题

4、从一个数集里面提取满足要求的数:

找出大于7的数字,

Select[{5,6,7,8,9}, # > 7 &]

找出偶数:

Select[{5,6,7,8,9}, EvenQ[#] &]

找出除以3余2的数字:

Select[{5,6,7,8,9}, Mod[#,3]==2&]

用Mathematica判定简单命题

5、100以内的正整数,各位数字之和大于5的数一共有多少个:

Select[Table[n,{n,100}],Total[IntegerDigits[#]]>5&]//Length

用Mathematica判定简单命题

6、列出前20个正整数,并且用红色来凸显其中的素数:

Table[Style[n,If[PrimeQ[n],Red,Green]],{n,20}]

用Mathematica判定简单命题

7、找出字典中以p开头和结尾的单词:

Select[WordList[],   StringTake[#, 1] == "p" &&     StringTake[#, -1] == "p" &] // DeleteDuplicates

用Mathematica判定简单命题

8、找出前50个素数里面,个位数不大于3的数:

Select[Table[Prime[n],{n,50}],IntegerDigits[#][[-1]]<=3&]

用Mathematica判定简单命题

  • matlab m语言怎么实现figure覆盖更新
  • Python编程:怎么使用math.erf()方法
  • 【Mathematica】如何处理字母大小写?
  • 怎样和华为毁约?
  • 如何用matlab拟合数据
  • 热门搜索
    宝宝睡前故事大全 世界名表大全 洛克王国宠物大全图鉴 鸡胸脯肉的做法大全 gta秘籍大全 国产车质量怎么样 五字古诗大全 怀孕注意事项大全 羊腿肉的做法大全 小学生满分作文大全