|
本帖最后由 冷水黃金 于 2014-1-5 19:28 編輯
: U6 I% a. w8 {! ?
) P+ B( c9 h) h3 O8 K1 h3 U讓我想起了那段快樂而瘋狂的日子
( u& _/ ?- r0 a2 S0 j4 y" D; B
- l3 G7 t( P& x改編14#,,未運行,十有八九有問題
: B. ?. P, K e& B* r7 o3 E7 V3 Y
7 a9 |( G, }6 w3 I5 ~9 u' ]$ R#include "stdio.h"
" k, z1 i9 j; t- w) @6 h9 Mint main(void) |7 V7 g2 H" W. k. L3 p
{
/ d# s1 A7 \1 I int p,q,i,j;, w/ y/ N9 J0 t$ N
int A,B,C,D;& X8 I9 S# f. s, v: j0 B8 H8 ~- o
float Y;
) j; r+ x8 O9 N0 i! G5 N2 A for(A=20;A<=70;A++)
9 q* \$ N# c& l {3 I, M# {8 \2 P# {
for(B=20;B<=70;B++) 9 W- d; R) t2 u5 [7 ]1 R% n4 _
{: [- k3 E; j2 y2 X: p% j
for(C=20;C<=70;C++)
: p9 R+ H7 [. g {
, g+ m; E2 v3 _. O2 W( l# i for(D=20;D<=70;D++)
2 D& i/ F* o' f: u: v. a2 t6 z {; v. p4 f2 c+ \1 }
Y=(float(A)*float(D))/(float(B)*float(C));; z8 g' x3 ?$ S$ ^
p=A*D;( u! [- P) D* B! X% s
q=B*C;& k' F3 A- e, v, g& C
i=p%q;2 G! ~6 B w; p' m
if(i!=0)( z5 d0 w2 T c# e" w
{
, j* P- _# J! f L+ a9 S p=j=i;! O$ z/ B9 n3 p* J W8 d$ ]; V( d' I; H
for(i=j;i>0;i--)
+ ?! R7 c/ }& y, u! ?3 B {) y3 \4 z, |+ X9 }5 b8 h2 {) F
if(i>p||i>q)
2 g0 j$ m$ b. X continue;
6 l. d3 ^9 z l6 R- K* y) R. o, N if(p%i==0&&q%i==0)
2 ^) V5 a+ e! \, `2 P8 B {5 j. C {. z2 n- F& J
p=p/i;' F! a' f& Q2 p
q=q/i;
! E6 F% }6 H! u% u5 x }
Y, n' T; ?/ c4 o3 v }' t6 ^- d0 }$ s p
for(i=1;i<=q/5;i++)* `7 K, k, W$ n
{
! T. V1 \5 Q8 Q) V if(q%5!=0)
# X9 c$ s& {5 e4 |+ L; ]& V- z break;
: l: u# c) p. ^7 l& M! F, C q=q/5;
; c/ y+ C2 }) U- @% x& c) ` }
9 N. Y3 P$ C) ~7 T) F9 ^ if(q!=1) " L- k/ q5 G: m4 X
for(i=1;i<=q/2;i++)) r" g( |& Z* u' R) e
{+ W, f- H0 o; H: L7 j2 s
if(q!=1&&q%2!=0)
" N7 w l& {; i+ A" G( t& y {
. H0 i" R, l- M, ?2 \2 R, O" m. r printf("A=%d B=%d C=%d D=%d Y=%f\n",A,B,C,D,Y);, ~$ G& p1 O0 L- C8 t- u
break;
; s1 `) H" Q1 K7 z+ _' F- r };
' m! v( \, C$ A) m( P, I- V% N q=q/2;
* R4 z4 X" v+ t; a }8 b. U$ g6 T, h1 q; t9 j
}0 L7 g+ t \7 @6 \! a
}# z6 ?9 p# K/ X+ s4 w
}
9 G. E) }. u( r4 J \& K }9 N: v. M0 w5 _4 s5 }$ _0 M; R
}- u# g2 Y; R6 f; M4 @) \% x. L
}7 K" q7 f. T8 ^6 H7 H; }
7 U. J- h1 T$ t+ ]# z, K& P
1 g. _+ W F8 p* y, E
/ t9 _, V/ o* `! [1 }9 R7 J) @- u
/ r6 V! B3 p. ?# E9 k( ^9 h) i4 k |
本帖子中包含更多資源
您需要 登錄 才可以下載或查看,,沒有帳號,?注冊會員
x
|