问答文章1 问答文章501 问答文章1001 问答文章1501 问答文章2001 问答文章2501 问答文章3001 问答文章3501 问答文章4001 问答文章4501 问答文章5001 问答文章5501 问答文章6001 问答文章6501 问答文章7001 问答文章7501 问答文章8001 问答文章8501 问答文章9001 问答文章9501

pascal问题 用下面的程序求回文数得不到结果 哪有问题?

发布网友 发布时间:2024-10-17 20:31

我来回答

3个回答

热心网友 时间:2024-10-25 15:33

procere h(var a1:integer;yes1:boolean);
这个地方应该改成
procere h(var a1:integer; var yes1:boolean);
这样yes的值才能传出来。

热心网友 时间:2024-10-25 15:34

var n,m,i:longint;
function (n:longint):boolean;
var i,j:longint;
st:string;
begin
str(n,st);
j:=length(st);
i:=1;
while (st[i]=s[j])and(i<=j) do begin
inc(i);
dec(j);
end;
if i>j then ss:=true
else ss:=false;
end;
begin
readln(m,n);
for i:=m to n do
if hws(i) then writeln(i);
end.
累死了,给点钱

热心网友 时间:2024-10-25 15:34

求回文数干吗用递归?用循环不行吗?

热心网友 时间:2024-10-25 15:33

procere h(var a1:integer;yes1:boolean);
这个地方应该改成
procere h(var a1:integer; var yes1:boolean);
这样yes的值才能传出来。

热心网友 时间:2024-10-25 15:34

var n,m,i:longint;
function (n:longint):boolean;
var i,j:longint;
st:string;
begin
str(n,st);
j:=length(st);
i:=1;
while (st[i]=s[j])and(i<=j) do begin
inc(i);
dec(j);
end;
if i>j then ss:=true
else ss:=false;
end;
begin
readln(m,n);
for i:=m to n do
if hws(i) then writeln(i);
end.
累死了,给点钱

热心网友 时间:2024-10-25 15:34

求回文数干吗用递归?用循环不行吗?
声明声明:本网页内容为用户发布,旨在传播知识,不代表本网认同其观点,若有侵权等问题请及时与本网联系,我们将在第一时间删除处理。E-MAIL:11247931@qq.com
南师足贴的功效和用法是什么 五指运湿膏能减肥吗 清颜六白膏真的管用吗 一个手机号建了两个微信号第一个微信号密码忘了怎么找回 ug最好用的版本是什么 带“沙鸥”的诗句大全(87句) 归计狎沙鸥的意思是什么 指期乘禁马,无暇狎沙鸥。 “无机终日狎沙鸥”的出处是哪里 “无暇狎沙鸥”的出处是哪里 狼道目录 拼多多上线购买火车票服务 有意进军在线旅游市场 物竞天择在哪可以下载到地图,游戏中下载游戏实在太慢 &lt;物竞天择 3.2&gt; 游戏联网中 建地图时 可以选“开启秘籍模式” 不知道... 拼多多飞机票是真的吗?如何买火车票? 物竞天择3.2怎样使用秘籍 物竞天择的指令(秘籍),不是管理员的那种,个人已知道五种。如:NS模式... NS物竞天择秘籍 ...100位以内整数),找出所有的回文数。 pascal语言做 集义乡无公害蔬菜 石崖村山西省阳泉市盂县牛村镇石崖村 科比与乔丹到底有哪些不一样? 耳朵里的经脉,耳朵很痛是什么原因 ...好像是里面的经脉还是血管,是怎么回事?是肌肉拉伤吗? 为什么我的左腿老是软又痛。小腿哪里会软会痛大腿就是经脉软软的。因为... 我母亲从小腿到大腿里,腿里的经脉酸且涨痛,站起来一弯腰就痛。这是什 ... pullupto的意思是什么? 昌河铃木利亚纳怎么了? 昌河铃木利亚纳a+的油门能手动调节吗 ...是64米,每隔4米摆一盆兰花,每两盆兰花中间摆一盆杜丹花,一共需要多... 大理考导游证去哪里报名 如何做人事管理工作 林内燃气热水 班鸠招架是什么意思 访问局域网内的电脑要输入密码 登录局域网计算机总要输入用户名密码真麻烦 高手来 乃班鸠是什么意思? 埃佩里奥王国主要势力 冷门独特稀少女孩名字(推荐起名335个) 关于泰国夜生活的一些术语解释 老板要换掉我怎么办 当自己的老板有换人的举动 知道换的是自己 该如何面对? 假设有5个詹姆斯,现役球员随你挑,有能打赢的组合嘛? 电视怎样看爱奇艺视频 手机爱奇艺怎样在电视上看 早上问候语温馨一句话情侣精选83句 康佳系统刷机教程 找几个有关饮食的日本动漫 康佳电视进不了刷机模式 ''我''字右边一个''阝'',这个字的读音是什么,哪位大神帮帮忙,多谢多 ...