QQ登录

只需要一步,快速开始

 注册地址  找回密码
查看: 2143|回复: 0
打印 上一主题 下一主题

函数大全(l开头)

[复制链接]
字体大小: 正常 放大
韩冰        

823

主题

3

听众

4048

积分

我的地盘我做主

该用户从未签到

发帖功臣 元老勋章

跳转到指定楼层
1#
发表于 2004-10-4 02:58 |只看该作者 |倒序浏览
|招呼Ta 关注Ta
<><FONT color=#ff0000>函数名: labs </FONT>
' E; i7 z" M" q) `用 法: long labs(long n);
) Y2 C3 Y' t( ^% a5 ^程序例: </P>: e0 n) `% a# A5 ^3 a  I
<><FONT color=#0000ff>#include <STDIO.H>
. T# Y& k' s, `# I! T: q# g#include <MATH.H></FONT></P>
2 k( n5 q5 w7 S  t, G$ f<><FONT color=#0000ff>int main(void)
" Y8 a: L2 j+ o( J{
) h$ @8 Q  _$ a0 J' e- }long result; 5 o: `4 t( x; M+ r; z; r
long x = -12345678L; </FONT></P>
4 K* f. p: U1 t<><FONT color=#0000ff>result= labs(x); 1 P& C' I7 B, S, n1 V
printf("number: %ld abs value: %ld\n", ) O% M* m/ H5 `, I& q
x, result); </FONT></P>
) k6 }( G# |, ?& j8 v% \( \<><FONT color=#0000ff>return 0; 1 E  i7 w8 Q7 X% p# `3 L: s
} % D, k( Z, h, f
</FONT>
4 v0 N* X7 P8 `# K/ Y( M. e: \3 y1 w) w3 W" m5 `
</P>0 W8 w& M. V0 [5 {: u
<><FONT color=#ff0000>函数名: ldexp </FONT>
( ^; x  m  E' F" M* z功 能: 计算value*2的幂 0 e. {1 h" V6 Y; V* ^$ }
用 法: double ldexp(double value, int exp); 4 G# A" j& M% c$ E& r0 {. |
程序例: </P>( E" C& t. U* j5 w5 w# @3 C3 h
<><FONT color=#0000ff>#include <STDIO.H>
8 h5 z- ^0 c5 }0 `#include <MATH.H></FONT></P>: J8 P1 d/ J) o! d( e+ z; ]
<><FONT color=#0000ff>int main(void) 1 O! b, ~# j& R1 Z
{ 5 `1 i  ~- Z2 A* h, s  w) b  }
double value;
" \" u' P/ I. {. ]double x = 2; </FONT></P>1 T: K1 a$ t( o9 f1 `
<><FONT color=#0000ff>/* ldexp raises 2 by a power of 3
' U* k- G% w" `$ h) Gthen multiplies the result by 2 */
9 \8 ~; o8 i! c$ m& H! Hvalue = ldexp(x,3);
& u, Y: f+ X$ i, }; y1 Oprintf("The ldexp value is: %lf\n",
; g- V7 x5 G/ g8 [) L; x2 y( D: [/ Ovalue); </FONT></P>4 O8 n7 z) r5 \# S2 T5 u1 l
<><FONT color=#0000ff>return 0;
+ B) C# G) K5 U}
/ Q' x4 [$ X# O$ T. p5 [4 A
: P: O3 d; {0 N2 o4 L4 k7 ?* k</FONT></P>6 s3 r5 F- \  ]
<><FONT color=#ff0000>函数名: ldiv </FONT>
( M7 T7 G$ }: V功 能: 两个长整型数相除, 返回商和余数 ; [8 H$ p. S7 i7 g
用 法: ldiv_t ldiv(long lnumer, long ldenom);
  S0 [( o6 D( Q# N# i7 S) G程序例: </P>" W" X3 E# t: U* o2 e4 X3 E
<><FONT color=#0000ff>/* ldiv example */ </FONT></P>
: q: e! R$ X( a1 G<><FONT color=#0000ff>#include <STDLIB.H>
+ {# Z3 |, ]1 O& F% V#include <STDIO.H></FONT></P>. L: c  h$ f$ E  O! ^- u- v
<><FONT color=#0000ff>int main(void) . `) _& x+ n# K) ?
{
7 M4 a0 v) v; Eldiv_t lx; </FONT></P>
# o+ Y! L/ p! B. g<><FONT color=#0000ff>lx = ldiv(100000L, 30000L);
( c. i8 [: t+ \* y, ~printf("100000 div 30000 = %ld remainder %ld\n", lx.quot, lx.rem); 0 U* A3 K( ?! M
return 0; </FONT>8 O9 @% d) E+ x
<FONT color=#0000ff>} </FONT># u+ i4 T7 B; ?' b& z
</P>) U# C5 V! @* o! C- }
<><FONT color=#ff0000>函数名: lfind </FONT>2 B4 h7 i+ z8 p$ X' O
功 能: 执行线性搜索
  L1 \& B2 X4 a; U& W) C$ y用 法: void *lfind(void *key, void *base, int *nelem, int width,
2 p/ Z0 S  O! W, Bint (*fcmp)()); 4 c, P  a0 Q& ^4 g
程序例: </P>2 V# h$ T2 j1 Z! s. c
<><FONT color=#0000ff>#include <STDIO.H>8 h$ T: g9 a. j5 b0 m7 T
#include <STDLIB.H></FONT></P>
: s3 o) s  u: `  L<><FONT color=#0000ff>int compare(int *x, int *y)
, Q0 Y/ E) V& |$ [3 S{
0 \( F7 A) x* X' p4 ~1 r9 f8 k% breturn( *x - *y );
8 j9 R& J& H& c4 J2 f# q6 d# F} </FONT></P>7 o7 w7 K! g+ V  z* e: U: T; B
<><FONT color=#0000ff>int main(void) 5 q9 O/ U) g9 \
{
- d" O! Q2 }" V( n) nint array[5] = {35, 87, 46, 99, 12};
' r' o; Q' r" U7 @4 W9 Usize_t nelem = 5;
! V2 |( @$ Q" Z% Y$ i: O, oint key;
7 M- o$ B! A: q5 Lint *result; </FONT></P>
) j& c& h$ o% s$ D3 g<><FONT color=#0000ff>key = 99; % s/ ^0 f4 d1 D
result = lfind(&amp;key, array, &amp;nelem, + Z  q% z1 e, }& t. t" u
sizeof(int), (int(*)(const void *,const void *))compare); 3 u& h5 C, ^' d1 y! _
if (result)
. b# `& A4 i- }8 a8 }printf("Number %d found\n",key);
6 x: i; a' a1 \9 [- W8 a$ melse ) j- G1 @, @( ~/ N0 x" V0 o2 E
printf("Number %d not found\n",key); </FONT></P>7 A) A) B8 F2 }
<><FONT color=#0000ff>return 0; / F4 o1 r) n/ s& N% H4 M
} </FONT>1 u8 l' f! a1 o
0 m* ]- u# E* P; P
</P>
4 z4 l! M3 d' K2 ^<><FONT color=#ff0000>函数名: line </FONT>9 A" x9 c8 c7 E0 ~
功 能: 在指定两点间画一直线
2 M1 x2 `6 d( I用 法: void far line(int x0, int y0, int x1, int y1);
3 u) ]6 o  S& z, L6 G程序例: </P>
' A  m6 l' m) T. d& [/ ?- }% r<><FONT color=#0000ff>#include <GRAPHICS.H>
( Y  ~; N  ?4 A#include <STDLIB.H>1 c/ _  `! T; k  N/ v
#include <STDIO.H>3 W0 P( I. ]0 t+ B# o
#include <CONIO.H></FONT></P>1 y6 s  Z- o. W1 N% C* X% K6 |3 L6 j
<><FONT color=#0000ff>int main(void)
# i- _5 N8 G( J$ h& v{ 0 [1 ]5 @7 r- K* Q
/* request auto detection */ / ]1 O7 `6 U  [- E, A1 O) e& b
int gdriver = DETECT, gmode, errorcode; $ d" @3 O& ?$ L: m
int xmax, ymax; </FONT></P>; q* F7 \) r# g& V8 {2 N- T( d
<><FONT color=#0000ff>/* initialize graphics and local variables */ 9 O) G0 P) N( h8 ^0 Y  }
initgraph(&amp;gdriver, &amp;gmode, ""); </FONT></P>8 g' }& _& k9 O1 t# s* }
<><FONT color=#0000ff>/* read result of initialization */
/ n; n" P5 b" V9 Z% |errorcode = graphresult(); / w* \( k6 X! ], t3 P$ E' }
/* an error occurred */
# C( ~; D6 z; ^. x0 i$ Aif (errorcode != grOk) ; L: R  Z- r4 e
{ 5 w+ C9 F, v6 {; G% _2 w) I9 a$ r
printf("Graphics error: %s\n", 4 ~2 I8 }2 Q1 r1 k  ]) R% I( W
grapherrormsg(errorcode));
2 H5 b, h  a0 [: G9 m- t- oprintf("ress any key to halt:"); 0 u7 b7 ]$ a2 g
getch(); 7 b0 [) l& z; U) p, L; I
exit(1);
) M2 K( a0 A$ a2 a2 I7 M; a} </FONT></P>% n3 n- z, N2 _. z
<><FONT color=#0000ff>setcolor(getmaxcolor()); ; i4 I! _, ?$ N' y, b2 \; C
xmax = getmaxx();
. E# B) J  d; _' aymax = getmaxy(); </FONT></P>
! B: R( V( ^2 d! y9 y( q# c<><FONT color=#0000ff>/* draw a diagonal line */ ; N, n: j8 b2 \" w  B9 f$ J
line(0, 0, xmax, ymax); </FONT></P>8 s. L2 y3 p1 ~
<><FONT color=#0000ff>/* clean up */
# r& W0 u1 b* z& k. r8 H) wgetch(); ' U, g) H0 @; ^  D' z6 E% {
closegraph();
* |# _1 _2 I: B, _# `; T7 z9 `return 0;
% w/ \3 o. h: j" I} $ `6 l0 o: K6 D! _
</FONT>, X6 ~: ]2 K" q) S
</P>2 Z  a! E5 d* J0 k6 z2 l' _" I
<P><FONT color=#ff0000>函数名: linerel </FONT>
8 F" E' z7 o' J, A5 ~2 F% Y功 能: 从当前位置点(CP)到与CP有一给定相对距离的点画一直线
7 p5 S9 a) n+ t" Q( p/ j6 j' t/ C用 法: void far linerel(int dx, int dy);
* L" m  q1 \8 n2 A程序例: </P>
" h  V5 H# s9 o& ]<P><FONT color=#0000ff>#include <GRAPHICS.H>5 y, H/ f1 g: K# V7 V
#include <STDLIB.H>
5 s$ b# t2 E. C- E5 \1 ^! e#include <STDIO.H>% w) d& X* y9 P  r; M- a
#include <CONIO.H></FONT></P>( l! s( w& {& ~! k$ n
<P><FONT color=#0000ff>int main(void)   W; k, K. w; D+ v, B, w
{
9 J7 ]' J- f; D/* request auto detection */
7 @" P0 Y! F; W4 V: ?# [+ B) J) r5 b1 tint gdriver = DETECT, gmode, errorcode;
- E0 t* y: m; a0 ~# b5 f+ h; ichar msg[80]; </FONT></P>
2 L- }* X. M* C0 I) S; R" r<P><FONT color=#0000ff>/* initialize graphics and local variables */ ! \' D& n& I7 }  ?  L, D
initgraph(&amp;gdriver, &amp;gmode, ""); </FONT></P>
+ n* E3 `5 a% d+ v<P><FONT color=#0000ff>/* read result of initialization */
. _0 W) |2 Q! D2 G' g9 Perrorcode = graphresult(); 7 E6 R4 I, g' U' E2 W
if (errorcode != grOk)
2 z0 Z. S% p; @$ N{
- ^6 a: D8 t4 O  C1 e+ nprintf("Graphics error: %s\n",
: ^) C0 I/ {/ y+ `6 U) dgrapherrormsg(errorcode));
& c4 }* Y  |" i( tprintf("Press any key to halt:"); + o6 Z! _2 W% I  S3 M7 y
getch(); ! U7 \: I/ v  Z2 y' H" s
exit(1); # d8 q- F1 B7 a
} </FONT></P>4 u- d7 r9 q& l9 d
<P><FONT color=#0000ff>/* move the C.P. to location (20, 30) */
0 j1 l2 c& y: B4 ?6 U5 ]' `moveto(20, 30); </FONT></P>
5 z7 k3 w% P9 c$ _9 ~' R( ]$ [. l<P><FONT color=#0000ff>/* create and output a
# s# g7 O# R# o( a9 J3 rmessage at (20, 30) */
- o0 K. o, Q" Qsprintf(msg, " (%d, %d)", getx(), gety());
& W! }' `; d4 n8 houttextxy(20, 30, msg); </FONT></P>1 g, B3 Z5 ~! F$ N1 d3 V8 _! a* h( i
<P><FONT color=#0000ff>/* draw a line to a point a relative ( [% V2 V( X5 S$ G0 i
distance away from the current ; u9 \2 C* C; a. ]1 ^2 |! L
value of C.P. */ . y5 @4 ^  G( p- W
linerel(100, 100); </FONT></P>4 E+ W; J/ {- C' c( j3 i2 K. C
<P><FONT color=#0000ff>/* create and output a message at C.P. */ , d3 l! d7 B; w7 x* @4 G2 U& w
sprintf(msg, " (%d, %d)", getx(), gety()); ) z  m. m4 q: Z
outtext(msg); </FONT></P>; p0 A. ~$ W6 A' v- [
<P><FONT color=#0000ff>/* clean up */
; j: y2 V6 `6 lgetch(); 4 V8 H' }2 s' \5 ^! j
closegraph(); . C2 \  m7 w, a/ }1 L- z5 k( @
return 0;
# q2 d1 l$ G1 c1 y$ j' |} </FONT>* W: ]! P- j0 p( u. ?
</P>% ^" D; K/ d9 V& N& J2 M
<P><FONT color=#ff0000>函数名: localtime</FONT>   R$ ?/ J9 l+ x( i" a! Y
功 能: 把日期和时间转变为结构 , ^3 ]3 ^1 }4 S  v( _
用 法: struct tm *localtime(long *clock);
0 N2 B$ _/ q9 P! Q6 `% Y  d程序例: </P>
7 }  Q3 k5 q8 x7 m  M<P><FONT color=#0000ff>#include <TIME.H>
, M. ^4 h2 I5 F% F1 _#include <STDIO.H>
( X6 x, U8 A4 Y% m+ t8 d# r3 @#include <DOS.H></FONT></P>
8 }; v/ {+ f/ j% j<P><FONT color=#0000ff>int main(void)
- H2 ^& d3 j* }1 P' B8 T: l{ . \; @) y/ I" `* X
time_t timer;
; M0 F) L& D3 K- P. e- p& H0 C  vstruct tm *tblock; </FONT></P>
+ G- `+ g9 Y4 i<P><FONT color=#0000ff>/* gets time of day */ 3 L; F) A. u! {0 f6 U* [# j7 s
timer = time(NULL); </FONT></P>
5 c$ h3 v% u$ a8 c  D5 ~<P><FONT color=#0000ff>/* converts date/time to a structure */ 0 D- {! n/ s, J3 C: i$ O! `
tblock = localtime(&amp;timer); </FONT></P>
, F* f$ S# |$ c: z  b1 t0 w<P><FONT color=#0000ff>printf("Local time is: %s", asctime(tblock)); </FONT></P>
' b* F% Q! I, K* q% V<P><FONT color=#0000ff>return 0; 8 |, K7 z3 n  x' |' r5 ~, D
} ' Q3 r+ c  r$ W: @

+ r  G$ f+ p7 F5 q4 b
  o+ @  y9 P: q' q- ~% E0 e1 F3 E" X* I</FONT></P>
  `' I: U$ J  @5 Q) j& r, x) `<P><FONT color=#ff0000>函数名: lock </FONT>5 H6 a# U) a& x8 {% s
功 能: 设置文件共享锁
! X, x$ r- Y7 ~! f9 r用 法: int lock(int handle, long offset, long length); ) ~2 j, V, O9 N$ ]: m
程序例: </P>
( Z  F) {4 H$ Q0 `6 g5 T<P><FONT color=#0000ff>#include <IO.H>; y$ Q: X4 t4 `! Y4 j( l- a2 a& ~, M+ _
#include <FCNTL.H>
& J1 f$ p7 k# s  n3 I#include <SYS\STAT.H>2 z8 _0 D7 c, {8 ]3 h  ^$ }: x: D
#include <PROCESS.H>
2 n+ w" }4 e+ D) C( H1 o+ O8 Y#include <SHARE.H>% ^+ g$ q- \* U' D1 N3 L2 a2 V& _3 K* S
#include <STDIO.H></FONT></P>
  K* J3 \* A2 u: F4 l" |& q<P><FONT color=#0000ff>int main(void)
4 a# ^; H# m  O; X{ , `; i1 J/ X, D9 x5 p8 w
int handle, status;
/ J6 ^, J, ]4 I. Olong length; </FONT></P>- j/ u  m; N% o' ]- A4 V* R' m
<P><FONT color=#0000ff>/* Must have DOS Share.exe loaded for */ & k6 c2 ]5 a! b; ?. O1 N9 f
/* file locking to function properly */ </FONT></P>9 ^0 L, ^9 O2 F% G+ A1 x# k
<P><FONT color=#0000ff>handle = sopen("c:\\autoexec.bat", 4 ^* B' {; Z  n1 t( T, ^8 v
O_RDONLY,SH_DENYNO,S_IREAD); </FONT></P>
  N/ \+ D% |& y* O<P><FONT color=#0000ff>if (handle &lt; 0)
* |% R4 y. Q' {. S; v- G{ : E3 k: T! U3 d# W. b! u5 L
printf("sopen failed\n");
/ T5 G% O; X( i3 G) Iexit(1);
7 o. g6 V4 R8 E6 r$ R. W0 }} </FONT></P># R8 H- q2 c$ X0 L
<P><FONT color=#0000ff>length = filelength(handle);
! k; e& T7 M; W3 Istatus = lock(handle,0L,length/2); </FONT></P>7 _5 f9 @/ K) c2 G2 N* _$ W- i8 |" t+ _
<P><FONT color=#0000ff>if (status == 0)
2 t" I% _1 v4 u- K( Z8 hprintf("lock succeeded\n");
) Z. s; o5 W: V, velse & H. `$ b- E3 L! M$ a
printf("lock failed\n"); </FONT></P>+ h9 P0 H6 h$ W5 @
<P><FONT color=#0000ff>status = unlock(handle,0L,length/2); </FONT></P>! ]' o1 I4 s7 d# n7 q# z
<P><FONT color=#0000ff>if (status == 0) : V! u0 U: U/ _3 z* }: `0 q* F+ }
printf("unlock succeeded\n"); ; h1 Z, |1 h" R* a
else ( X- f& h4 }" P2 E: ^: s0 y7 p1 {
printf("unlock failed\n"); </FONT></P>. i. A. m9 _9 r& c
<P><FONT color=#0000ff>close(handle);
  n: e! R6 B; T. c% o) B# b" g6 }( breturn 0; : U" M) h; I; P
}
. [# a0 M, u, G( P, L1 |! O& r. ?</FONT>
6 ^  f3 P( _( A- W</P>
# `1 p! U6 n+ ^" x6 w/ }  g<P><FONT color=#ff0000>函数名: log </FONT>
: q8 M$ M" D! V! O0 M# A7 U功 能: 对数函数ln(x)
% D- l8 H& i- o) E用 法: double log(double x);
1 l8 [9 {) t' E# L: \7 R程序例: </P>* I2 J" C$ r. o' P9 r' T
<P><FONT color=#0000ff>#include <MATH.H>
" s% K3 R2 f6 ?4 G) Y% s#include <STDIO.H></FONT></P>9 ]/ L5 I' X. q
<P><FONT color=#0000ff>int main(void)
! T8 u$ _" G: }, v9 v0 f( q5 q{ ( h; I3 B- f! Q3 J5 Z
double result;
; s4 M5 Y- r* d: Pdouble x = 8.6872; </FONT></P>
' R5 b1 |) `2 X  D<P><FONT color=#0000ff>result = log(x);
% f5 B7 u$ J. a* Z; z# W+ A8 ?printf("The natural log of %lf is %lf\n", x, result); </FONT></P>$ \7 x9 v$ q+ v3 x8 L6 i
<P><FONT color=#0000ff>return 0;
' C6 z8 O6 D3 ?- @} 3 O' H+ Z+ I, W: F& q0 S

9 Y% R1 ]5 Y+ J$ b" F* k/ C. [</FONT></P>
$ e" H* N9 T$ |- K; m<P><FONT color=#ff0000>函数名: log10 </FONT>* a  R8 N( O3 f3 U
功 能: 对数函数log 3 A, e  p4 g* c$ [& i
用 法: double log10(double x); % i" d  ~" L6 l, i% v/ w$ _
程序例: </P>
0 s5 M, l+ @7 }# v9 L3 Z' t/ {<P><FONT color=#0000ff>#include <MATH.H>
% Y- |9 w! r8 m#include <STDIO.H></FONT></P>
5 |2 Y/ w; _8 z! _<P><FONT color=#0000ff>int main(void) % l0 F6 _* t( B- q
{
8 z* I1 }' W1 zdouble result;
! m, F/ S1 G/ V- mdouble x = 800.6872; </FONT></P>
; M9 X; L* z( N+ X<P><FONT color=#0000ff>result = log10(x);
9 L+ n: k% W! Z: g: `printf("The common log of %lf is %lf\n", x, result); </FONT></P>
  q. S. y+ ~/ c! N$ @<P><FONT color=#0000ff>return 0;
' E6 C% p' m4 E; u' |+ k: ?0 D}
" O, K& H) P- _1 y+ a8 O1 L! n" [
</FONT>+ k" C2 r2 l6 S9 T  d$ n" I' d1 I. s- P5 V
</P>
. t) ?; j" g3 @; p+ \' L<P><FONT color=#ff0000>函数名: longjump </FONT>
' y2 A, ]2 b2 M+ }功 能: 执行非局部转移 9 O8 h0 [$ i& G' m. P
用 法: void longjump(jmp_buf env, int val); . ]* {2 G5 j' A3 h2 R  i+ b
程序例: </P>- R5 k2 V+ y4 z1 S
<P><FONT color=#0000ff>#include <STDIO.H>
; k; @! K7 G% g0 M, \#include <SETJMP.H>  H7 z; c0 Q7 x. r
#include <STDLIB.H></FONT></P>
# {: m: U. S( Y<P><FONT color=#0000ff>void subroutine(jmp_buf); </FONT></P>
6 n3 F1 W/ d( x- }) [# {( I  D2 V0 W<P><FONT color=#0000ff>int main(void)
8 ?4 o1 r0 _9 Z+ C3 }. n( i{ </FONT></P>
" ?! Z! r% R' l. G2 W# |<P><FONT color=#0000ff>int value; , x$ s  w+ K. t
jmp_buf jumper; </FONT></P>
: V: w+ f( G, F<P><FONT color=#0000ff>value = setjmp(jumper);
; C) `/ I- F+ [7 r3 [3 oif (value != 0) 5 u1 t  s8 H8 l  q/ p0 ~% {8 h7 F
{
7 n- L2 Z  E# \printf("Longjmp with value %d\n", value);
- ?7 P' R$ y" F8 Texit(value);
" I4 f6 \9 Y0 H* l}
9 J& H, Y! O- P) l) f6 A" Fprintf("About to call subroutine ... \n"); 6 p1 N$ J2 g6 R! Z
subroutine(jumper); </FONT></P>
: {: ~7 e6 ~$ B& A) f5 m<P><FONT color=#0000ff>return 0;
4 v4 z- f( |: R) N/ g# ^  \} </FONT></P>
7 L( o0 c2 _( I# ^+ N5 W0 H<P><FONT color=#0000ff>void subroutine(jmp_buf jumper)
$ d$ X/ ]3 n5 ~{ 1 e. G/ A1 A8 |% _* n+ B
longjmp(jumper,1); $ w5 _9 R: T& r4 ^
}
7 }" F$ J! |3 q+ D$ V6 `! S* J' k
</FONT>6 f' `& V7 i6 M% N
</P>
) u, K, v: f) q) v. V$ `<P><FONT color=#ff0000>函数名: lowvideo</FONT> 6 J- P. Q( c& W6 C+ K
功 能: 选择低亮度字符
4 L' T1 N5 j. j4 F" h用 法: void lowvideo(void);
/ v: a' @9 b  ^0 Y- m程序例: </P>
" Q: r' F0 g+ O( t/ c<P><FONT color=#0000ff>#include <CONIO.H></FONT></P>
" k9 J2 p! Q" p6 R5 c: n<P><FONT color=#0000ff>int main(void) ) d+ C2 K$ e! Y4 c& _
{
$ H. {2 v5 X, N% Hclrscr(); </FONT></P>1 y- G/ U) y2 z6 F. \; b
<P><FONT color=#0000ff>highvideo();
, Y5 n+ F7 X3 |cprintf("High Intesity Text\r\n"); . A+ P  x1 ]) v& @; E2 g
lowvideo();
: i7 s8 k2 H% g# Z# N% Zgotoxy(1,2); . r+ D/ Z4 X: W, L5 ]
cprintf("Low Intensity Text\r\n"); </FONT></P>& j! x: s4 z' c+ L. f: o
<P><FONT color=#0000ff>return 0; 8 j( V- m1 O" N  V* e( ?
} ! H/ p5 C9 `. h5 k

2 E9 K$ v( |2 G# u! d' t; X1 K</FONT>
2 A" R3 }( ]; h: o$ \</P>0 P' ]7 L- k1 h" a3 N- L
<P><FONT color=#ff0000>函数名: lrotl, _lrotl </FONT>
' ], ~; ~& J, x功 能: 将无符号长整型数向左循环移位 ! A( S+ f! g& s6 g
用 法: unsigned long lrotl(unsigned long lvalue, int count);
( r: }/ Y* w" h- k- N, _0 j. ~) eunsigned long _lrotl(unsigned long lvalue, int count);
$ f# u/ v8 Q8 d8 u5 Q6 h! r程序例: </P>
8 g% R2 s8 J6 j& R8 @<P><FONT color=#0000ff>/* lrotl example */
+ }) [. E# ^0 K; U#include <STDLIB.H>
: g0 c1 U5 d: a. q$ T; e#include <STDIO.H></FONT></P>" t, f$ A; s' W6 J. I1 f& E% H( ^
<P><FONT color=#0000ff>int main(void)
8 E! \! v5 z8 g4 i  V. U{ & j6 [7 G. i% Y7 W; R
unsigned long result; 1 t" \) `/ h" h$ I3 [" O! m, E
unsigned long value = 100; </FONT></P>
) X7 |/ e! v% Z, S$ L0 Q# d! T<P><FONT color=#0000ff>result = _lrotl(value,1);
5 l2 A4 {1 E2 h( `0 o( X1 dprintf("The value %lu rotated left one bit is: %lu\n", value, result); </FONT></P>
8 [4 @7 f; w5 S4 {; P<P><FONT color=#0000ff>return 0; ( |2 x7 Q* \( u4 D
}
1 P# d* y; B9 P4 Q</FONT>$ D7 d6 C: n! Z' J/ }
</P>
6 H2 Q' `8 J% G3 V1 `<P><FONT color=#ff0000>函数名: lsearch </FONT>- Q" ?- N% \: @5 E( g
功 能: 线性搜索 ; X# g0 Q( d! `7 k; D% b; o1 A
用 法: void *lsearch(const void *key, void *base, size_t *nelem, % D" H. f+ ~8 U
size_t width, int (*fcmp)(const void *, const void *));
* K9 X5 E, \* s程序例: </P>
7 h# }/ d$ @/ i" l: Z- ^1 B" m<P><FONT color=#0000ff>#include <STDIO.H>
% V( C0 y% F! w! u#include <STDLIB.H></FONT></P>; M6 V6 \8 x# s& Q' B. u
<P><FONT color=#0000ff>int compare(int *x, int *y)
9 b2 w$ E; v' L- b6 m6 j$ T6 G{ 9 A/ A, ]% N8 z6 s
return( *x - *y );   }. r6 F" a1 t, Y4 v4 b
} </FONT></P>1 A( J7 d0 Z. H
<P><FONT color=#0000ff>int main(void) . U' }0 P/ f; r9 {
{ 8 D+ O& y7 D/ O: L% S" r. f
int array[5] = {35, 87, 46, 99, 12}; & ?( R: c: H8 r
size_t nelem = 5;
' W/ Q/ Y& ?, I1 f9 }int key; 6 B- q( d3 A/ Q2 j
int *result; </FONT></P>6 ~$ e8 G7 _# Q! h- H
<P><FONT color=#0000ff>key = 99;
! T$ f. V; `& ~! |; vresult = lfind(&amp;key, array, &amp;nelem,
1 f# q  m2 p0 k! Bsizeof(int), (int(*)(const void *,const void *))compare); 6 u) V$ ~0 R% L% P
if (result)
2 U9 p& ^1 z2 P, z% C; I2 S" t, l. U* Qprintf("Number %d found\n",key);
. H4 F3 \) q+ V6 ^else - s7 }1 u& H. {  g7 c7 v
printf("Number %d not found\n",key); </FONT></P>6 i' q( K* s9 Q2 `
<P><FONT color=#0000ff>return 0; 2 s9 G  i, L/ U# ^, |
}
( `: B: N! w: w% G4 y. j
8 B; j1 w- m5 s& t' c</FONT>5 w6 Q, N; Y5 z% X* M4 B9 Z9 Q
</P>
  h7 [# Y1 [: _4 N. ~# d( E<P><FONT color=#ff0000>函数名: lseek </FONT>
. A) q  u; W  @* h" n功 能: 移动文件读/写指针 8 m' U4 A; Y) J/ G( e  d/ I. _
用 法: long lseek(int handle, long offset, int fromwhere); " W  C: K. m2 l8 P! V3 K
程序例: </P>0 \* _) A4 v7 ?- z
<P><FONT color=#0000ff>#include <SYS\STAT.H>
: {1 g/ G, P. `/ u#include <STRING.H>
& c+ B& }1 A$ n: j" b3 D; S#include <STDIO.H>
! d: ~+ f. Y0 V5 z  V/ x5 |#include <FCNTL.H>
5 }0 F0 O% y: Y8 I, ~+ t" h$ B7 H. E#include <IO.H></FONT></P>6 g* M( K0 r- I; U: S+ F
<P><FONT color=#0000ff>int main(void)
; f- N8 s; p  v5 ~7 V6 @{
: m3 m+ {. m3 F, hint handle;
0 u- p' ^# [7 Hchar msg[] = "This is a test"; 9 S5 A0 d" _$ W; h
char ch; </FONT></P>9 G& _+ w% S  @+ h0 i$ _$ \
<P><FONT color=#0000ff>/* create a file */ 4 c+ G/ x) k& G
handle = open("TEST.$$$", O_CREAT | O_RDWR, S_IREAD | S_IWRITE); </FONT></P>
2 v9 j# T7 m% v. S* p3 n<P><FONT color=#0000ff>/* write some data to the file */ ) n8 V4 ], e% D) F/ e
write(handle, msg, strlen(msg)); </FONT></P>* r# k, h4 E9 u" d- g' D: B
<P><FONT color=#0000ff>/* seek to the begining of the file */
3 {& H! O" G$ R- l+ c7 elseek(handle, 0L, SEEK_SET); </FONT></P>
$ Q1 T' L2 d" s: q<P><FONT color=#0000ff>/* reads chars from the file until we hit EOF */ ; x1 J" b) ?! x
do
8 B: Y9 U% T: `  p$ k9 Z{
3 }% F8 y: g; qread(handle, &amp;ch, 1);
" D  P0 J) I& J0 X$ \. W4 Mprintf("%c", ch);
2 Z) C7 i0 b: V* e7 |- \} while (!eof(handle)); </FONT></P>, W) C! K; ^( v  }+ }
<P><FONT color=#0000ff>close(handle); 8 u2 Q/ ]4 U1 T# I0 q7 u) @3 V8 r3 f
return 0; : i6 W$ K3 B8 s7 d
}
2 j+ t0 B$ g8 F2 N: q</FONT></P>
* r$ k1 s8 A9 L* D$ ]# I3 R<P align=left><FONT color=#0000ff></FONT> </P>
zan
转播转播0 分享淘帖0 分享分享0 收藏收藏0 支持支持0 反对反对0 微信微信
您需要登录后才可以回帖 登录 | 注册地址

qq
收缩
  • 电话咨询

  • 04714969085
fastpost

关于我们| 联系我们| 诚征英才| 对外合作| 产品服务| QQ

手机版|Archiver| |繁體中文 手机客户端  

蒙公网安备 15010502000194号

Powered by Discuz! X2.5   © 2001-2013 数学建模网-数学中国 ( 蒙ICP备14002410号-3 蒙BBS备-0002号 )     论坛法律顾问:王兆丰

GMT+8, 2026-10-25 09:23 , Processed in 1.857791 second(s), 57 queries .

回顶部