论坛 › 基础知识 › 一个有趣的数学题：欧拉计划第33题，有兴趣的同学看过来

pacelife 发表于 2015-12-14 22:16:08

程序见图片，没有进行优化

钢铁侠2014 发表于 2015-12-16 22:16:16

钢铁侠2014 发表于 2015-12-14 10:46 static/image/common/back.gif
很有意思的小题目啊，刚好最近在学python，晚上回家写个小程序算算

我的程序丑爆了。。。matlab
clear all
a=(10:99)';
b=10:99;
k=1;
c={};
for i=1:90
    for j=1:90
      if a(i)<b(j)
            if floor(a(i)/10)==floor(b(j)/10)
                if a(i)/b(j)==(a(i)-10*floor(a(i)/10))/(b(j)-floor(b(j)/10)*10)
                  c{k}=;
                  k=k+1;
                end
            end
      end
    end
end
for i=1:90
    for j=1:90
      if a(i)<b(j)
            if (a(i)-floor(a(i)/10)*10)==floor(b(j)/10)
                if a(i)/b(j)==floor(a(i)/10)/(b(j)-floor(b(j)/10)*10)
                  c{k}=;
                  k=k+1;
                end
            end
      end
    end
end
for i=1:90
    for j=1:90
      if a(i)<b(j)
            if floor(a(i)/10)==(b(j)-floor(b(j)/10)*10)
                if a(i)/b(j)==(a(i)-10*floor(a(i)/10))/(floor(b(j)/10))
                  c{k}=;
                  k=k+1;
                end
            end
      end
    end
end
for i=1:90
    for j=1:90
      if a(i)<b(j)
            if (a(i)-floor(a(i)/10)*10)==(b(j)-floor(b(j)/10)*10)
                if a(i)/b(j)==(floor(a(i)/10))/(floor(b(j)/10))
                  c{k}=;
                  k=k+1;
                end
            end
      end
    end
end

Hello.KT 发表于 2015-12-18 09:05:43

牛！！！！！！

我就是我212 发表于 2016-11-18 15:09:19

都是牛人

般若李 发表于 2018-4-12 16:59:52

:)

amcordant 发表于 2019-2-18 10:10:48

学习了都是大神啊

Hassanzzz 发表于 2019-2-20 15:16:14

前排都是大神，我只会用笔算排除得到答案。

shajiallj 发表于 2019-2-22 11:23:24

惭愧，连题目都没看懂

火花水月 发表于 2019-6-6 11:43:40

感谢分享

查看完整版本: 一个有趣的数学题：欧拉计划第33题，有兴趣的同学看过来