用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拟合数据
  • 热门搜索
    吃什么水果减肥最快 衡山旅游攻略 我的世界地图怎么打开 康佳冰箱质量怎么样 腹部减肥穴位 看门狗攻略 一天一斤减肥法 弹跳力怎么练到1米 百度打不开怎么回事 埃菲尔铁塔简介