||||||||||
送积分：32&&收藏人气：113
所属分类：&|&&|&&|&&|&&|&
出 版 社：
作者：林盛华ISBN：6页码：166出版时间：纸张：胶版纸版次：1开本：16开字数：261000
温馨提醒：ISBN号是《》的唯一识别码
Free Pascal程序设计关联图书
Free Pascal程序设计内容简介
Free Pascal程序设计目录
第一章&Pascal语言的基本知识
第一节&Pascal程序的基本组成
第二节&Pascal语言系统的使用
第三节&Free&Pascal的菜单和窗口
第二章&Pascal语言的基础知识
第一节&Pascal基本字符集、标识符与保留字
第二节&Pascal的标准数据类型
第三节&标准函数
第四节&Pascal语言的运算符
第三章&顺序结构程序设计
第一节&常量和变量
第二节&输入输出语句
第四章&分支结构程序设计
第一节&Pascal中的布尔（逻辑）类型
第二节&关系表达式与布尔表达式
第三节&简单的If语句
第四节&复合语句
第五节&If语句的嵌套
第六节&Case语句
第五章&循环结构和数组
第一节&For循环语句
第二节&While循环语句
第三节&直到型循环（Repeat&&&Until语句）
第四节&多重循环
第五节&控制循环流程或程序的语句
第六节&一维数组
第七节&二维数组
第六章&字符串和进制的转换
第一节&字符串
第二节&计算机中数的表示
第三节&不同进制数之间的转换
第七章&模块化程序设计
第一节&自定义函数
第二节&过程的定义
第三节&变量参数
第四节&全程变量和局部变量
第五节&函数和过程的区别
第八章&文件操作、枚举、子界、集合和记录类型
第一节&文件的概念
第二节&文件的函数和过程
第三节&枚举类型
第四节&子界类型
第五节&集合
第六节&记录类型
第九章&高精度计算
第一节&高精度加法
第二节&高精度减法
第三节&高精度与单精度的乘法
第四节&高精度与高精度的乘法
第五节&高精度与单精度的除法
第六节&高精度与高精度的除法
第十章&指针变量及线性链表
第一节&指针变量
第二节&线性链表
前5位评价用户：
发表评价即可获得积分，前五位评价用户可获得多倍积分哦！
我在中教图书购买过此商品
计算机书店图书分类
其他人正在关注的
¥16.80¥66.00¥66.00¥66.00¥37.44
中教图书客服中心商品编号：
京 东 价：
[定价：￥]
支　　持：
合约套餐：
请选择套餐内容
　您选择的地区暂不支持合约机销售！
白条分期：
在线客服：
服务支持：
PASCAL程序设计
加载中，请稍候...
商品介绍加载中...
扫一扫，精彩好书免费看
京东商城向您保证所售商品均为正品行货，京东自营商品开具机打发票或电子发票。
凭质保证书及京东商城发票，可享受全国联保服务（奢侈品、钟表除外；奢侈品、钟表由京东联系保修，享受法定三包售后服务），与您亲临商场选购的商品享受相同的质量保证。京东商城还为您提供具有竞争力的商品价格和，请您放心购买！
注：因厂家会在没有任何提前通知的情况下更改产品包装、产地或者一些附件，本司不能确保客户收到的货物与商城图片、产地、附件说明完全一致。只能确保为原厂正货！并且保证与当时市场上同样主流新品一致。若本商城没有及时更新，请大家谅解！
权利声明：京东上的所有商品信息、客户评价、商品咨询、网友讨论等内容，是京东重要的经营资源，未经许可，禁止非法转载使用。
注：本站商品信息均来自于合作方，其真实性、准确性和合法性由信息拥有者（合作方）负责。本站不提供任何保证，并不承担任何法律责任。
印刷版次不同，印刷时间和版次以实物为准。
加载中，请稍候...
est_11(北京)
zhongduisi1(河北)
jd_6b4b57c70b40b(江苏)
tushudaimai1(江苏)
lixiangrong1(河北)
yuyccvv(广东)
showsun520(安徽)
Fish_0901(四川)
showsun520(安徽)
加载中，请稍候...
加载中，请稍候...
加载中，请稍候...
加载中，请稍候...
加载中，请稍候...
加载中，请稍候...
浏览了该商品的用户还浏览了
加载中，请稍候...
七日畅销榜
新书热卖榜
iframe(src='///ns.html?id=GTM-T947SH', height='0', width='0', style='display: visibility:')输入三个数:a b c,从小到大输出这三个数(pascal编程),并作解说.
输入三个数:a b c,从小到大输出这三个数(pascal编程),并作解说.
不区分大小写匿名
是在Free Pascal下运行吗 ？
i,a,b,c: I
Writeln('请输入第1个数：');
Readln(a);
Writeln('请输入第2个数：');
Readln(b);
Writeln('请输入第3个数：');
Readln(c);
if a &= b then
if b &= c then
write(Format('%d,%d,%d',[c,b,a]))
else if a &= c then write(Format('%d,%d,%d',[b,c,a]))
else write(Format('%d,%d,%d',[b,a,c]));
if a &= c then write(Format('%d,%d,%d',[c,a,b]))
else if b &= c then write(Format('%d,%d,%d',[a,c,b]))
else write(Format('%d,%d,%d',[a,b,c]))
Turbo pascal
a,b,c,max,min: (定义变量)beginreadln(a,b,c); (读入3个数字分别赋予a
b 其中的大数赋予max,小数赋予min) begin max:=a; min:=b end
（让c与最大值和最小值比较） begin max:=cif
then begin min:=cwriteln(max,'
',a+b+c-max-min,'
',min);（输出结果）end.
晕啊！楼上疯了吗？写这么长！
a: Array[1..3] Of I
t, i, j: IBegin
ReadLn(a[1], a[2], a[3]);
//读三个数
For i:=1 To 2 Do
For j:=i+1 To 3 Do
//每个数都和它后面的比较
If a[i] & a[j] Then Begin
//判断大小
t := a[i]; a[i] := a[j]; a[j] :=
For i:=1 To 3 Do Write(a[i], ' ');
//输出交换好的结果End.
你是刚开始学pascal的吧，我用简单一些的方法来编：
a,b,c:beginreadln(a,b,c);{读入三个数}
{共有六种情况，分别是， 123， 132 ， 213，231，312，321，符合那种情况就输出那种}if (a&b)and(b&c) then writeln(a:3:3,b:3:3,c:3:3);if (a&c)and(c&b) then
writeln(a:3:3,c:3:3,b:3:3);if (b&a)and(a&c) then
writeln(b:3:3,a:3:3,c:3:3);if (c&a)and (a&b)then
writeln(c:3:3,a:3:3,b:3:3);if (b&c) and (c&a) then writeln(b:3:3,c:3:3,a:3:3);if (c&b) and (b&a) then
writeln(c:3:3,b:3:3,a:3:3);end.
相关知识等待您来回答
编程领域专家
& &SOGOU - 京ICP证050897号}