作业帮 > 综合 > 作业

如果用free pascal篇写程式 应该怎样写;;请各位大侠指点一下

来源：学生作业帮 编辑：百度作业网作业帮 分类：综合作业 时间：2024/05/16 22:27:18
如果用free pascal篇写程式 应该怎样写;;请各位大侠指点一下
任意输入一个正整数,(0
如果用free pascal篇写程式 应该怎样写;;请各位大侠指点一下
var
i,j,k,n,tmp:longint;
a:array[1..3]of longint;
begin
read(n);
a[1]:=n mod 10;
n:=n div 10;
a[2]:=n mod 10;
n:=n div 10;
a[3]:=n mod 10;
for i:=1 to 3-1 do
for j:=i+1 to 3 do
if a[i]
写了一篇作文,请各位老师和高手们指点一下 请各位大侠指点一下,表示天热的好句子?拜托,谢谢了 碰一下就鼓起肚子的鱼,请各位大侠指点是什么鱼. 怎样写作文的题记,请指点 怎样描述夏天的风?小弟要写作文,请各位指点. 怎样写好想象作文?五年纪的想象作文,请各位大侠指导指导啊! 6.73×4.8+0.52×6.73怎样简便计算,请才人指点,写一下过程,谢谢了 摆餐具英语怎么写?请各位学霸指点! 统计 用free pascal free pascal怎样产生随机数 对联,请各位大侠帮忙写一副对联. 72dpi是什么意思?请各位大侠指点!谢谢!