本帖最后由 冷水黃金 于 2014-1-5 19:28 編輯
) |1 R! N' f- q
0 v8 x2 l/ G+ B2 e5 t% ~讓我想起了那段快樂而瘋狂的日子 t, e' P7 w) T# S
, Y, n2 m2 U2 F
改編14#,未運行,十有八九有問題' [ f) {8 U( w% @, e) ]8 Q
& {: T- H- X: f: u7 U( d, p) n
#include "stdio.h"
7 W& r) w4 [* R4 Bint main(void)
E0 q1 V; q* F1 _{
0 T$ L) S# i( N% W, K int p,q,i,j;! z) g- c6 d8 k# ?7 ^
int A,B,C,D;
+ @1 [. g2 M" a% y/ p3 ] float Y;
7 V5 _! }0 z8 ?* v for(A=20;A<=70;A++)
# d; q2 o' o Z f- x2 b) k( y {7 v# C# Z+ F) \% u3 O) ^" {2 N
for(B=20;B<=70;B++)
c, }# J) ?( @6 f5 D9 N {& Y1 }7 |0 V7 I: [1 t; o
for(C=20;C<=70;C++) % j8 V7 w2 o; u* ~- N+ k2 e
{
+ Y7 ]5 t* D8 V: b for(D=20;D<=70;D++) + s$ F9 Q7 Q) k2 _, R; `; R
{! w9 q. t9 b, G/ Z k+ H' T
Y=(float(A)*float(D))/(float(B)*float(C));- i5 y: F* W1 Y4 f
p=A*D;
4 w! \% M3 i+ J0 ] I q=B*C;
& j0 F( d6 V" \3 P" X, ^, I8 m+ o1 a i=p%q;
0 h7 T! R; p5 C8 G' [ if(i!=0)/ A/ J: ]/ u4 S7 M4 \9 r& @
{
" u, ^* W; V+ Y: i' u/ a6 Y* b0 v; ] p=j=i; n% k) B4 E% l4 |: C! y$ A
for(i=j;i>0;i--)4 `3 {9 P2 \( @" N) E) A
{$ N; O8 E5 W- Q+ Z- I
if(i>p||i>q)
& O' ?$ l' u- O1 r2 Y continue;' Y* `$ q) P" @. }- v
if(p%i==0&&q%i==0)
0 |9 `8 b( k- w0 U3 e9 v {
" y4 a. d2 V! h# B; N p=p/i;
' B# B6 \0 I" j q=q/i;
( b& S( \; \$ [2 ?8 W }! }$ f: V) ^3 c7 r
}
" b9 z* Z E0 I1 |3 } for(i=1;i<=q/5;i++)
: d' I$ O) S1 _, P5 m {
9 y: Q- M7 d- [" c) Y" Z* Q6 J if(q%5!=0)9 G) A7 c! Y" U* B
break;6 N( W7 I9 @0 e. c$ e' W: @
q=q/5;
0 ]8 }8 a+ c* Q }
( D$ R; G1 ?7 L; X: a if(q!=1) 6 s7 p9 h1 @: u
for(i=1;i<=q/2;i++) S% `) Z2 D% G$ n- o' T0 Z9 e
{; v/ B+ E. j: r
if(q!=1&&q%2!=0)
! N0 T* |" V/ D+ w& Q1 P) q$ ~ {
) r T8 d" y" f4 t printf("A=%d B=%d C=%d D=%d Y=%f\n",A,B,C,D,Y);3 k! A2 y$ r' E# d p
break;! v; X1 ~" F6 X5 S) Z/ p
};4 I8 Q! |7 @/ A' f9 k+ R7 e( I) Y
q=q/2;1 d# N0 S. K) q* ~1 }& y4 M
}8 ]/ a# a! u' h5 u \5 x
}$ n( {( {: V/ r
}
2 U1 K: b. K: g$ w& M Z4 `- V& ? }# l4 T. U7 S, p$ s' V1 d
}
. N- T# s& c7 U& e9 Q2 h7 N9 i }
. Q3 [- Y' H7 Q. F5 z2 L}0 R! ^& p+ _. f% a( k2 z6 f# U* m
+ |5 N4 f8 i; r
4 _" v) n% s% d" q+ z
$ W; d5 w9 m* n# a
4 j, L' P; y v2 p0 V |