首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写程序 【程序功能】 在给定范围内查找k,使得公式k2+k+17生成的整数满足以下条件:该数的十进制表示中低3位数字相同,去掉低3位后的整数是回文数。例如,当k=461时,用公式生成的整数是212999,该数满足条件。 【编程要求】 (1)编写函数子程序
编写程序 【程序功能】 在给定范围内查找k,使得公式k2+k+17生成的整数满足以下条件:该数的十进制表示中低3位数字相同,去掉低3位后的整数是回文数。例如,当k=461时,用公式生成的整数是212999,该数满足条件。 【编程要求】 (1)编写函数子程序
admin
2019-04-04
99
问题
编写程序
【程序功能】
在给定范围内查找k,使得公式k2+k+17生成的整数满足以下条件:该数的十进制表示中低3位数字相同,去掉低3位后的整数是回文数。例如,当k=461时,用公式生成的整数是212999,该数满足条件。
【编程要求】
(1)编写函数子程序found(n1,n2,array)以实现以下功能:k依次取n1~n2范围内的每个整数,分别用每个k及公式k2+k+17生成整数y,若y满足给定条件,则将k值及y值保存到array数组中,函数返回array数组及数组中k的个数。
(2)编写主程序,实现以下功能:声明二维数组array(10,2)和变量n1、n2,输入两个整数并保存到n1、n2中,用n1、n2及array数组作为实参调用found函数,按所给格式输出array数组中的数据到屏幕及文件myf2out中。
【测试数据及运行结果】输入:n1=1,n2=10000输出:k number
461 212999
586 343999
3839 14741777
【要求】
(1)源程序必须存放在文件MYF2F90中。
(2)数据文件的打开、使用、关闭均要求采用FORTRAN语言文件管理语句实现。
(3)程序运行结果存于文件MYF2OUT中。
(4)本题完成后必须将MYF2F90、MYF2OUT复制到考试盘(盘符为T:)的根目录下供阅卷用。
选项
答案
! 1,10000 ! k number ! 461 212999 ! 586 343999 ! 3839 14741777 ! Pressanykeytocontinue functionfound(n1,n2,array)result(found_res) implicitnone integer::n1,n2,found_res integer,dimension(10,2)::arrayinteger::i,j,x1,x2,x3,y,k i=0 dok=n1,n2 y=kk+k+17 x1=y/1000;x2=x1;x3=0dowhile(x1>0) x3=x310+mod(x1,10); x1=x1/10enddo if(x2==x3.and.mod(y,10)==mod(y/10,10).and.mod(y,10)==mod(y/100,10))then i=i+1 array(i,1)=karray(i,2)=yendif enddofound_res=iendfunction programmainimplicitnone integer::n1,n2,found integer,dimension(10,2)::arrayinteger::i,j open(1,file="myf2.out") read,n1,n2 j=found(n1,n2,array) print"(2a12)","k","number"write(1,"(2a12)")"k","number"doi=1,j print,array(i,1),array(i,2)write(1,),array(i,1),array(i,2) enddoclose(1) Endprogram
解析
转载请注明原文地址:https://kaotiyun.com/show/vbhZ777K
0
全国高校计算机二级
相关试题推荐
输入一个表示整数的字符串,把该字符串转换成整数并输出。例如输入字符串"345",则输出整数345。
已知流行音乐为共享文件,搜索该文件夹。
从地址栏搜索“网易”论坛。
如果在利用宽带连接,在Internet选项中设置宽带连接的用户名sy和密码2006。
在金山毒霸2008中,设置可疑文件在被清除前备份至病毒隔离系统。
用金山清理专家按默认模式清理其他应用软件的历史痕迹。
在"命令提示符"属性窗口下,改屏幕颜色为"蓝色"。
在写字板文件中插入一个Word文档对象,内容为"祝你取得成功!"。保存在C盘下。
在Excel中,函数ABS(ROUND(-1.478,2))的计算结果是()。A.-1.478B.1.48C.-1.48D.1.5
已经为演示文稿设置了动画效果,现希望保留动画效果设置参数,但在播放时没有动画效果,则可通过选择()菜单项来完成这项工作。A.动画预览B.预设动画C.设置放映方式D.动作设置
随机试题
能产生LTA的细菌是
管电压在摄影条件选择中的意义,错误的是
保管特殊类型药材必须具有
在公共场所附近开挖沟槽时,应设防护设施,夜间设置照明灯和警示红灯。()
在某些情况下,被保险人患病或遭受意外伤害,最终是否残疾在短期内难以判定,为此保险公司规定一个定残期限,过了该期限后仍无明显好转征兆的,认定为全残。这种情况称为( )。
立面图的绘制中整个建筑的外轮廓尺寸线用( )线绘制。
信用风险管理委员会或类似机构可以考虑重新设定/调整限额的情况有()。
饮水时,应注意遵循少次多量的原则。
把对集体与个人的管理结合起来的班级管理是()。
A、Thecablecarride.B、GoldenGatePark.C、Fisherman’sWharf.D、Busesandstreetcars.A男士问女士最喜欢旧金山的什么,女士回答:“我也不知道,这很难说。我喜欢金门大桥
最新回复
(
0
)