设为首页收藏本站
开启辅助访问 切换到窄版
搜索
第一问答网»论坛 › 中问网 › 问答 › 用free pascal 编一元二次方程编程步骤

用free pascal 编一元二次方程编程步骤

[复制链接]
查看11 | 回复3 | 2010-12-7 22:24:29 | 显示全部楼层 |阅读模式
我做的是直接读入了ax2+bx+c中的a，b，cvara,b,c,d,e,f:real;beginreadln(a,b,c);d:=-b;e:=sprt(b*b-4*a*c);f:=2a;x1:=(d+e)/f;x2:=(d-e)/f;writeln(x1,x2);end;应该对的
回复

使用道具 举报

千问 | 2010-12-7 22:24:29 | 显示全部楼层
program ex1;//求解1~N质数(N>=4)var//变量定义n, i, j : integer;//N及循环变量I, Jf : boolean;//布尔型变量Fbegin//开始readln(n);//读入Nwrite('2', '3');//先输出2和3.因为它们一定是质数for i :=
回复

使用道具 举报

千问 | 2010-12-7 22:24:29 | 显示全部楼层
文不对题
回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

千问

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
回复楼主 返回列表
热门排行