爱问知识人 爱问教育 医院库

pascal你能设计一个程序帮她找回密码吗?

首页

pascal你能设计一个程序帮她找回密码吗?

是pascal语言! 小婷的QQ密码是一个5位数,但由于较长时间没有打开,她忘记了密码。小婷的生日是8月1日,她妈妈的生日是9月1日,所以她特别喜欢用81和91的公倍数(既是81的倍数又是91的倍数)作为密码,她还记得这个密码的百位数是1。你能设计一个程序帮她找... 是pascal语言!
小婷的QQ密码是一个5位数,但由于较长时间没有打开,她忘记了密码。小婷的生日是8月1日,她妈妈的生日是9月1日,所以她特别喜欢用81和91的公倍数(既是81的倍数又是91的倍数)作为密码,她还记得这个密码的百位数是1。你能设计一个程序帮她找回密码吗?(提示:依次穷举10000到99999的之间数字,只要是81和91的倍数,并且百位数字是1即可。)输出:22113 展开

提交回答

全部答案

    2018-05-29 04:19:07
  • var
    i,j,n:longint;
    begin
    for i:=10000 to 99999 do
    if (i mod 81=0) and (i mod 91=0) and (i div 100 mod 10=1) then
    begin writeln(i); break; end;
    end.

    右***

    2018-05-29 04:19:07

类似问题

换一换

相关推荐

正在加载...
最新资料 推荐信息 热门专题 热点推荐
  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200
  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200
  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200
  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200

热点检索

  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200
返回
顶部
帮助 意见
反馈

确定举报此问题

举报原因(必选):