pascal 编程Description求方程 的根,用三个函数分别求当b^2-4ac大于0、等于0、和小于0时的根,并输出结果.从主函数输入a、b、c的值.x1为大根,x2为小根.Inputa b cOutput输出两个根,先输出大根,再输出小

来源:学生作业帮助网 编辑:作业帮 时间:2024/11/01 06:55:05
pascal 编程Description求方程 的根,用三个函数分别求当b^2-4ac大于0、等于0、和小于0时的根,并输出结果.从主函数输入a、b、c的值.x1为大根,x2为小根.Inputa b cOutput输出两个根,先输出大根,再输出小
xSn@U1~q,`ł=h'1)P(GD xU DJ>)+~K!!%{O=Bτ5nп?ظu {fv}DWFлޅwN7\.'pg V ᫷}yFwo8|I&_v׷kѳ'b}'mqa5$MbKz[d|R⸻Jb6}!ZOIF%Q6boOGjOtgdfKc .HפZas? +h#S)807LdN-8G@le 07&.I~ш%{™5yƄ}<:C kD݂$UĪV~MѬKv֥IQɳ+*elBe @Y$ْs:ұ,Dc g]"EZXi-KXU

pascal 编程Description求方程 的根,用三个函数分别求当b^2-4ac大于0、等于0、和小于0时的根,并输出结果.从主函数输入a、b、c的值.x1为大根,x2为小根.Inputa b cOutput输出两个根,先输出大根,再输出小
pascal 编程
Description
求方程
的根,用三个函数分别求当b^2-4ac大于0、等于0、和小于0时的根,并输出结果.从主函数输入a、b、c的值.
x1为大根,x2为小根.
Input
a b c
Output
输出两个根,先输出大根,再输出小根,如果是虚根,先输出虚部正的,再输出虚部负的.(保留3位小数)
如下
x1=?x2=?
输出格式如下:
若为虚数:x1=%.3f+%.3fi x2=%.3f-%.3fi
若不为虚数:x1=%.3f x2=%.3f
Sample Input
4 1 1
Sample Output
x1=-0.125+0.484i x2=-0.125-0.484i
Hint
Source

pascal 编程Description求方程 的根,用三个函数分别求当b^2-4ac大于0、等于0、和小于0时的根,并输出结果.从主函数输入a、b、c的值.x1为大根,x2为小根.Inputa b cOutput输出两个根,先输出大根,再输出小

  如上图,输入、输出的截图

  var

  a,b,c,x,y,t:double;

  begin

  readln(a,b,c);

  t:=b*b-4*a*c;

  if t>0

  then begin

  x:=-b/(2*a); y:=sqrt(t)/(2*a);

  writeln('x1=',x+y:0:3,' x2=',x-y:0:3);

  end

  else if t=0 then writeln('x=',-b/(2*a):0:3)

  else begin

  x:=-b/(2*a); y:=sqrt(-t)/(2*a);

  writeln('x1=',x:0:3,'+',y:0:3,'i x2=',x:0:3,'-',y:0:3,'i');

  end;

  end.

Free pascal 求连续数字的平方和Description 编程求1平方+2平方+...+n平方 Input 输入一行,只有一个整数n(1 pascal 编程输入下列图案 用pascal语言编程:输出n(n 用free pascal编一个程序,如下用free pascal 编程 Description 果园里种了很多桃树,当桃树开始结果的时候,猴子便会成群结队地前来摘桃.猴子们第一天会摘掉桃子的一半还多一个,第二天再摘第一天 description 如下图所示,请回答下列编程,PASCAL语言 pascal编程:哥德巴赫猜想题目描述输入N(N pascal语言编程问题(free pascal求1—N中的素数的个数.(1 pascal编程求1+3+5+...+n一定要是自己是过的,要用pascal! pascal编程打印如下星号图形【FOR】打印图形(七)Time Limit:1000MS Memory Limit:65536KTotal Submit:19 Accepted:10 Description 打印如下类型的图案.Input 输入一个数n.Output 输出n*n大小的图形.图例是n=7的情况. pascal 编程Description求方程 的根,用三个函数分别求当b^2-4ac大于0、等于0、和小于0时的根,并输出结果.从主函数输入a、b、c的值.x1为大根,x2为小根.Inputa b cOutput输出两个根,先输出大根,再输出小 用 pascal 编程Description给出一个不多于5位的非负整数,要求 1、求出它是几位数 2、分别输出每一位数字 3、按逆序输出各位数字,例如原数为321,应输出123Input一个不大于5位的数字Output三行 第一 用pascal 编程Description要将China译成密码,译码规律是:用原来字母后面的第4个字母代替原来的字母.例如,字母A后面第4个字母是E.E代替A.因此,China应译为Glmre.请编一程序,用赋初值 用pascal求这一年中每个月的13号是星期几Description编程统计:从1900年1月1日(星期一)开始经过的n年当中,每个月的13号这一天是星期一、星期二、星期三、……、星期日的次数分别是多少?( 第K极值的解法pascal描述 Description 给定一个长度为N(0 编程找出六位平方数使它的前三位和后三位都是平方数 要用pascal语言要的是pascal编程过程 pascal pascal pascal! pascal编程计算并输出12+22+32+.+1002大神求解!急!