附上相关程序,请审核。

;-------------------------解二元一次方程组------------------------

(defun 1y1c (a c) (if (/= a 0) (/ c (float a)))) ; 解一元一次方程 ax=c

(DEFUN 2Y1C (A1 B1 C1 A2 B2 C2 / x y) ; 二元一次方程组 A1x+B1y=C1

(IF (= A1 0) ; A2x+B2y=C2

(SETQ Y (1Y1C B1 C1))

(SETQ Y (1Y1C (- B2 (* (/ A2 (float A1)) B1)) (- C2 (* (/ A2 (float A1)) C1))))

)

(setq X (if y (1Y1C A2 (- C2 (* B2 Y)))))

(list x y)

)

;-------------解一元二次方程------------------------------------

(defun 1y2c (a b c / d e f) ; 一元二次方程 Ax^2+Bx+C=0

(setq d (- (* b b) (* 4 a c))

e (/ b -2.0 a)

f (/ (sqrt (abs d)) 2 a)

)

(cond((= d 0) (list e))

((> d 0) (list (+ e f) (- e f)))

((< d 0) (list e "+/-i" f))

)

)

追问 : 那个f 为什么不能用(/ d 2a) 前面不是对d进行赋值了么

追答 :f是根据公式写的。

解一元二次方程lisp_lisp语言编写lisp程序解二元一次方程组和一元二次方程组应该怎么做​...相关推荐

  1. 编写lisp程序解一元二次方程_用C语言编写一程序求解一元二次方程的根。

    展开全部 C语言编写一程序求解32313133353236313431303231363533e78988e69d8331333365643661一元二次方程的根: #include #include ...

  2. 编写lisp程序解一元二次方程_vb解一元二次方程代码

    Vb 程序解一元二次方程 以下是程序代码 需要的控件 7 个 label 3 个 text 一个 command Private Sub Command1_Click() Dim a, b, c, d ...

  3. 编写lisp程序解一元二次方程_怎样用C语言编一个解一元二次方程的程序?

    展开全部 用三个变量,来接一元二次方程的三个参数, 然后62616964757a686964616fe78988e69d8331333365633839根据这三个参数计算△=b*b-4ac,再根据△判 ...

  4. C语言: 编写一个程序解鸡兔同笼问题:已知鸡兔总数为a, 鸡兔腿总数为b, 计算出鸡兔各多少只

    题目: 编写一个程序解鸡兔同笼问题:已知鸡兔总数为a, 鸡兔腿总数为b, 计算出鸡兔各多少只 题目分析:直接使用顺序结构就行         1.设鸡有x只,兔子有y只,因此x+y=a:即,  x=a ...

  5. python输入一个正整数n求下列算式的值_C语言编写程序:输入一个正整数x和一个正整数n,求下列算式的值。,C语言 编写一个程序,输入一个正整数,求出它是几位数。...

    导航:网站首页 > C语言编写程序:输入一个正整数x和一个正整数n,求下列算式的值.,C语言 编写一个程序,输入一个正整数,求出它是几位数. C语言编写程序:输入一个正整数x和一个正整数n,求下 ...

  6. C语言编写一个赋值程序,实验2 用C语言编写简单程序——2.1 基本数据处理.doc

    实验2 用C语言编写简单程序--2.1 基本数据处理 实验2 用C语言编写简单程序 2.1 基本数据处理 [实验目的] (1)掌握算术表达式和赋值表达式的使用. (2)掌握基本输出函数的使用. (3) ...

  7. 心碎的图案怎么用c语言编出来,教案实验2用c语言编写简单程序.doc

    教案实验2用c语言编写简单程序 实验2 用C语言编写简单程序 2.1 基本数据处理1.调试示例 改正下列程序中的错误,求华氏温度100oF对应的摄氏温度?计算公式如下,其中:c 表示摄氏温度,f 表示 ...

  8. 用 C 语言编写的程序被称为,用c语言编写的程序被称为

    快速导读: Q1:用C语言编写以下程序 #includeintmain(void){ intm,n,i,t; printf("InputM,N(int0if(scanf("%d%d ...

  9. 用PL/SQL语言编写一程序,实现按部门分段(6000以上、(6000,3000)、3000元以下)统计各工资段的职工人数、以及各部门的工资总额(工资总额中不包括奖金)

    用PL/SQL语言编写一程序,实现按部门分段(6000以上.(6000,3000).3000元以下)统计各工资段的职工人数.以及各部门的工资总额(工资总额中不包括奖金) 输出到一张表中 直接输出在屏幕 ...

最新文章

  1. libevent中的信号处理
  2. 5位Mixin Network SDK作者分别获赠价值4千美金的50个XIN token
  3. MobaXterm工具连接Linux服务器入门使用手册,国产化泰山服务器连接工具使用演示
  4. 2019.4.27 人工智能培训安装工作记录
  5. 关于停止发表“每周新闻回顾”的通知
  6. {转}Java 字符串分割三种方法
  7. OpenGL基础19:法向量与漫反射
  8. 谈谈Fragment的用法之Fragment实现Tab切换中的那些事
  9. Thinkpad E430 vt功能开启
  10. centos7下添加常用YUM源(EPEL/Remi/RPMforge/php/Nginx)
  11. mysql 日期减10分钟_获取当前时间减去10分钟的话SQL语句怎么写
  12. 普通相片打印纸如何长时间保存
  13. java自动化测试语言高级之Java 9 新特性
  14. 蓝桥杯 2014-4 大衍数列
  15. oracle学习札记57
  16. 2023年美国大学生数学建模竞赛增加春季赛!!!
  17. python排列组合
  18. 防磨防爆系统:华润集团海丰电厂的锅炉安全保障
  19. ADSL宽带共享上网设置图解
  20. geo下载表达矩阵 多因素差异分析 deseq2 duqiang_1分析GEO数据库差异基因(GSE150910)将差异基因与泛素化酶取交集

热门文章

  1. windows平台基础工作软件整理【持续更新】
  2. 医疗行业容灾备份解决方案
  3. AnyPi智能语音音箱方案 智能蓝牙WIFI音箱方案开发 DuerOS及Alexa平台
  4. 盒子中图片下方出现空隙
  5. java 定义整数数组_JAVA中数组的正确定义方法是什么?
  6. 低度酒的诸神之战,能分出胜负吗?
  7. 攻防世界——web新手题
  8. 等额本息计算式的推导
  9. 【万里征程——Windows App开发】SemanticZoom视图切换
  10. 企业app系统软件制作大概需要多少钱