QQ登录

只需要一步,快速开始

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

函数大全(l开头)

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

823

主题

3

听众

4048

积分

我的地盘我做主

该用户从未签到

发帖功臣 元老勋章

跳转到指定楼层
1#
发表于 2004-10-4 02:58 |只看该作者 |倒序浏览
|招呼Ta 关注Ta
<><FONT color=#ff0000>函数名: labs </FONT>
4 s! s. Y" p4 x5 k$ q用 法: long labs(long n); 2 ^7 G' W4 I( [8 l& R
程序例: </P>/ T! c- b: u8 i8 ^2 B
<><FONT color=#0000ff>#include <STDIO.H>
9 P% U" o2 y- R& `% F3 ?4 v5 R#include <MATH.H></FONT></P>6 p6 E1 K% p/ v$ g$ T$ l; E
<><FONT color=#0000ff>int main(void) 8 A- ?- L/ ~9 J* c; b5 q4 Z
{ 6 ]; A5 k: L$ P, W. g' ]7 N* r
long result; . Z, ]: M1 g4 q
long x = -12345678L; </FONT></P>
2 Z  m+ K6 ~) y, s% ?( R<><FONT color=#0000ff>result= labs(x);
! F1 _' R' q% I9 U% P0 b5 f9 H! oprintf("number: %ld abs value: %ld\n", - F! z; d# k% c& r9 \2 ?
x, result); </FONT></P>
0 k; d$ p& `: D7 V<><FONT color=#0000ff>return 0; 7 K; s, }: i% x; O' W
}
4 |. h, a) `1 v* `</FONT>, ?2 i/ H, ]# W, T5 r( c

1 V4 j& A/ \! ?</P># G2 {+ ~# H/ E- ]
<><FONT color=#ff0000>函数名: ldexp </FONT>+ ?6 n% W1 t2 |# i; ]
功 能: 计算value*2的幂 1 G4 \- L+ r$ m: E& [
用 法: double ldexp(double value, int exp); * n  |4 q5 K" q  x
程序例: </P>9 x) Q  Z: H& B4 p; ~
<><FONT color=#0000ff>#include <STDIO.H>
7 `' m6 B7 }3 h$ E4 r: O#include <MATH.H></FONT></P>
$ g& f- ]8 q7 V) D3 S2 B7 N* w<><FONT color=#0000ff>int main(void)
6 G. k+ Y2 e1 L{
* O% V) d+ e, ndouble value;
# B% p7 `* s$ F/ V) A7 Tdouble x = 2; </FONT></P>( E. p  N1 U3 Z+ v
<><FONT color=#0000ff>/* ldexp raises 2 by a power of 3
8 @: H7 {- U- xthen multiplies the result by 2 */ 2 z2 e4 G; y2 G. a" ]4 E
value = ldexp(x,3);
) ~  G* C% g4 o( T$ m+ i0 V4 f+ F0 qprintf("The ldexp value is: %lf\n",
3 l+ f. H0 w2 L. y; L- Ovalue); </FONT></P>
& }8 c4 r8 Q) t% Y<><FONT color=#0000ff>return 0; 8 B7 t2 ~0 a$ k, m  @) z
} + |4 o& w/ ?( P5 x! k/ ?: Y* M
/ b7 ]/ l: W) `8 N& s4 p
</FONT></P>7 W$ n! K" i$ s( l9 a# e; r
<><FONT color=#ff0000>函数名: ldiv </FONT>
" p( m0 W$ g* F功 能: 两个长整型数相除, 返回商和余数 , `3 t' r  \: k- \* n7 \: v
用 法: ldiv_t ldiv(long lnumer, long ldenom);
6 f2 r3 ?# E" O8 F% |8 B0 B: g程序例: </P>
" i  k  O% U- s' u<><FONT color=#0000ff>/* ldiv example */ </FONT></P>3 E: R: U: D. l" @7 P1 R! S; d+ P
<><FONT color=#0000ff>#include <STDLIB.H>
% t9 Y( Z3 q* o' D! q* c; t7 u#include <STDIO.H></FONT></P>
; v3 H/ C' c  b3 d3 M% _<><FONT color=#0000ff>int main(void)
) W4 v& S3 X$ C8 q) x: ?{ & b. g9 _% S! ]/ t/ Q% J7 I" F9 D
ldiv_t lx; </FONT></P># j, G) v7 I" @) l+ J! A+ W
<><FONT color=#0000ff>lx = ldiv(100000L, 30000L); - A8 z& l* z/ u. R9 i) z
printf("100000 div 30000 = %ld remainder %ld\n", lx.quot, lx.rem);
' l/ K" l8 g, b; K$ w0 Oreturn 0; </FONT>7 Q, d9 N$ }' m( `$ C7 ^
<FONT color=#0000ff>} </FONT>
) O; o; ]- R0 f  V, c</P>
& @: v$ X$ M2 {" s<><FONT color=#ff0000>函数名: lfind </FONT>
9 f+ K1 A7 M7 J5 w5 C9 h4 O" H功 能: 执行线性搜索
$ X+ L5 E- U3 e/ P! U8 X# r用 法: void *lfind(void *key, void *base, int *nelem, int width, + [, O6 o7 C. W3 Y
int (*fcmp)());
4 M( w9 Y7 m# S: _3 _5 L' Z程序例: </P>
$ R! M5 [* g1 I, h<><FONT color=#0000ff>#include <STDIO.H>
/ G7 R- }# T  q# G8 v" @#include <STDLIB.H></FONT></P>
* O2 ]2 X& _8 ~" k9 u: k- c<><FONT color=#0000ff>int compare(int *x, int *y) 8 R; i2 _; p$ I1 f, z# J
{
# i0 O% U: [9 W1 T8 E" \return( *x - *y );
( m9 b2 ~4 H2 m1 i" K* V} </FONT></P>
; x3 x* S* D( P' |<><FONT color=#0000ff>int main(void) 4 [, b, ?% n0 B4 w" I
{
4 o, M6 q; Z6 Tint array[5] = {35, 87, 46, 99, 12};
% W  B" f6 Z9 n, c; ?5 a0 @! `3 `size_t nelem = 5;
1 j6 Q6 o" }; t) L5 I% j' [: G" sint key;
0 D% o$ a9 _2 |" oint *result; </FONT></P>- h0 w9 t$ Y3 Y% Y+ y% m  ?
<><FONT color=#0000ff>key = 99; % C; M) ~; s! }$ c- K! V  x0 Z$ Q2 P
result = lfind(&amp;key, array, &amp;nelem, 3 Y0 |6 t6 R- i$ j$ `
sizeof(int), (int(*)(const void *,const void *))compare); 6 |# L) T4 Z$ v5 n
if (result) 7 F9 c! I# d* U- x; U) p
printf("Number %d found\n",key);
! c9 K+ o+ p8 s8 J$ Belse
( b. {6 }7 q* [3 Z" Zprintf("Number %d not found\n",key); </FONT></P>, z9 f# ]9 z; f. h7 l
<><FONT color=#0000ff>return 0; ) ?% C: D: w# D2 S0 }! w; M) a8 }% n
} </FONT>
/ S) J9 i8 G% S# ?9 ]) o7 y: K( y8 l% l% ^7 |3 I
</P>
& I2 r8 x) w! a  |, _3 a9 P<><FONT color=#ff0000>函数名: line </FONT>/ h& i  ]& u- s# k5 K
功 能: 在指定两点间画一直线
" X' T5 R5 J0 F" K. s$ I1 X用 法: void far line(int x0, int y0, int x1, int y1); ! ]! I2 f" |& Y) ^
程序例: </P>
  ~0 r& c' C# x* g8 A/ `$ j<><FONT color=#0000ff>#include <GRAPHICS.H>$ l6 K5 f; E2 q% r4 \& [, e
#include <STDLIB.H>+ h* M* y0 j- b1 [' W, y/ S
#include <STDIO.H>! m6 r: }7 |* _+ F: u7 r- W4 v
#include <CONIO.H></FONT></P>) N& g2 r# q* Y0 s
<><FONT color=#0000ff>int main(void) * Q4 U) Y$ R) \1 Q
{
7 B( V7 J+ v3 Y, g/* request auto detection */ 0 ~5 w( ^" k* Z
int gdriver = DETECT, gmode, errorcode;
7 d) Q' G( ~) w0 e- `int xmax, ymax; </FONT></P>
4 E1 ~4 Q, S: e( `; e/ e/ r: j: L<><FONT color=#0000ff>/* initialize graphics and local variables */ * A( h: N# m& j+ \7 t. Z
initgraph(&amp;gdriver, &amp;gmode, ""); </FONT></P>8 Y: ]" y: ~- A# {" u5 X
<><FONT color=#0000ff>/* read result of initialization */ ' _0 L0 k2 F2 ?. a1 H4 H
errorcode = graphresult(); + x7 k1 h" i$ d: |& k$ I4 s
/* an error occurred */
8 p/ ?0 Q! d3 L) A" P( J4 ^. G- t& Oif (errorcode != grOk) " N0 @" D8 s; b: a5 T' K- M( |
{ ) x% H% Z) h2 l
printf("Graphics error: %s\n", ) ]! ~. {/ ~- R
grapherrormsg(errorcode));
' a7 D5 H3 _6 W) M* O' [  Q6 N1 A* pprintf("ress any key to halt:");
2 S& w, o; D0 z/ r+ l( ]3 bgetch();
. J8 F5 H2 _9 N/ Z: ^exit(1); 4 E0 _! p( M0 J2 V2 g( Q. k9 j
} </FONT></P>
& t! ?4 R! S# B: w+ R2 n<><FONT color=#0000ff>setcolor(getmaxcolor()); ! i9 Y) e- x. I3 @& n+ U: U0 ]
xmax = getmaxx();
/ z5 r: l; o0 X; F4 p8 gymax = getmaxy(); </FONT></P>  W# R# `: U& `0 g# z% C/ w
<><FONT color=#0000ff>/* draw a diagonal line */ ) `0 F( D! N+ H$ c
line(0, 0, xmax, ymax); </FONT></P>/ K9 g, Z% E6 h2 t  s1 a
<><FONT color=#0000ff>/* clean up */ 3 p& w4 G* f4 e2 y1 e6 I
getch(); 4 w4 A9 L: A6 H1 y% v
closegraph(); 4 F$ l* N& R5 N& U
return 0;
) F4 }1 k% p% k9 J; T7 v8 s+ J} 6 }. _% K! g& x- c
</FONT>6 A4 }# ^4 E  _7 Z- F' `/ C
</P>
7 V3 D" j" W; d- g, K. l1 ^<P><FONT color=#ff0000>函数名: linerel </FONT>
" L  H( c3 ?9 X5 [) J功 能: 从当前位置点(CP)到与CP有一给定相对距离的点画一直线
  K# g$ ?! ^0 C8 P; [% h用 法: void far linerel(int dx, int dy); # y, O2 S. Q( ^6 B- d* n
程序例: </P>$ b4 {) N1 L0 p: `% Z
<P><FONT color=#0000ff>#include <GRAPHICS.H>
8 S3 \7 ^* n+ C- L# G4 X#include <STDLIB.H>
8 G7 |) u& E# c#include <STDIO.H>
! g; b! i  K+ s' r. z#include <CONIO.H></FONT></P>- p9 s4 Q& f7 n% _6 q' ?( G
<P><FONT color=#0000ff>int main(void)
* \8 c6 r1 ^$ S. z5 X{ % x8 y9 _+ Z! ]& A
/* request auto detection */ 6 \& g6 S) }0 U9 p
int gdriver = DETECT, gmode, errorcode; ' E# i, h3 r- X  K0 |9 J: @
char msg[80]; </FONT></P>
* h* f4 R& Z: F9 M; E0 ^' x<P><FONT color=#0000ff>/* initialize graphics and local variables */
3 b( R4 Z& J3 @  R" A7 r' minitgraph(&amp;gdriver, &amp;gmode, ""); </FONT></P>9 m- t+ ~1 w! c6 T
<P><FONT color=#0000ff>/* read result of initialization */
1 n) F0 G# d2 |6 e" X. P$ C" aerrorcode = graphresult();
: N0 {$ P% ^& m6 [% `5 rif (errorcode != grOk) & v6 W/ v5 d5 G2 Y! u( J
{
, R% L6 P( y- i4 a2 Sprintf("Graphics error: %s\n", 9 W) j( U" D0 _% q, j2 {  ]3 y
grapherrormsg(errorcode));
, \8 ~8 d# {, S. c) y$ \; ?printf("Press any key to halt:");
% f$ a* c$ r; b/ Q( Q5 A$ [getch();
( i  z7 I. M9 \8 A) Zexit(1);
: r# a6 G  ?" h/ g} </FONT></P>
" v1 p: _& T6 p  j2 c1 u/ l' L' z<P><FONT color=#0000ff>/* move the C.P. to location (20, 30) */
6 o; F+ _. R1 U2 s9 J% Y" e  P4 x( kmoveto(20, 30); </FONT></P>: z% E6 z# C" o: F
<P><FONT color=#0000ff>/* create and output a ; B0 M" n1 M; A! A
message at (20, 30) */ ) y( E( s/ F: U/ M- T
sprintf(msg, " (%d, %d)", getx(), gety()); 4 F  w; H/ [5 z) V9 X( W$ }! e
outtextxy(20, 30, msg); </FONT></P>
& l6 u1 s; s* Z" v<P><FONT color=#0000ff>/* draw a line to a point a relative
. D0 x! ^0 W& x- e, Ydistance away from the current
. f0 }5 a# w7 h6 xvalue of C.P. */
1 A4 ]9 P/ ^! v3 k3 _; W8 Clinerel(100, 100); </FONT></P>
. f' p2 @% p  O3 Y$ @: I5 j<P><FONT color=#0000ff>/* create and output a message at C.P. */
/ @% _, Q' U- j# Wsprintf(msg, " (%d, %d)", getx(), gety()); 4 g7 L6 E3 u* u$ R2 N* m
outtext(msg); </FONT></P>
0 i* e2 J$ _/ A/ }' k  L2 t9 k9 N2 q<P><FONT color=#0000ff>/* clean up */ : @) ?6 e+ Z- a; U. o( @
getch(); # n! P8 H0 U! c' z* W+ @
closegraph(); . _. x" T; t1 ^+ t! D
return 0;
; K, w4 M- q6 m' r  ^6 L} </FONT>
% N! v, E! c: n* y0 q- ]. p</P>
9 u6 \% n, w( S; x* Y) U1 c: g) ~' h<P><FONT color=#ff0000>函数名: localtime</FONT> . {2 l* `/ F% O( l; u
功 能: 把日期和时间转变为结构
) }- H4 c$ c8 n/ r用 法: struct tm *localtime(long *clock); " W7 h$ ]9 Y# f
程序例: </P>
' c/ W+ k7 j4 y& Z4 o+ z6 [. p' O<P><FONT color=#0000ff>#include <TIME.H>6 _2 ~, @4 s2 {! {: O. O* O* F
#include <STDIO.H># v/ D5 _( ]3 k% e3 |) Z; Q
#include <DOS.H></FONT></P>
6 x" o: v4 R6 t' B<P><FONT color=#0000ff>int main(void)
* @/ v5 u) y: O4 `! w8 v{ / y' w. v$ i% Q$ y* S! `% o
time_t timer;
/ H3 j2 W7 F" h1 v1 F6 Dstruct tm *tblock; </FONT></P>
6 n# M( U* p' u3 U, ?<P><FONT color=#0000ff>/* gets time of day */ * t' ]' ^' ~6 M* d
timer = time(NULL); </FONT></P>
8 l+ T$ x7 s2 p' `<P><FONT color=#0000ff>/* converts date/time to a structure */ 7 U. ]  J9 t0 C& B5 b0 `  B# v
tblock = localtime(&amp;timer); </FONT></P>6 A! ]" p0 q! \: D, z
<P><FONT color=#0000ff>printf("Local time is: %s", asctime(tblock)); </FONT></P>8 r; ?. ]; C( O, K! t. [) m+ @9 N
<P><FONT color=#0000ff>return 0;
# t1 X+ D2 |" e} $ {) r$ S0 w" F7 R9 R6 c5 v0 u# R

4 i, x( k: l" b# {" S$ w" Y; a
7 b0 U% a3 ~) h. h- a% Z</FONT></P>
. k4 h0 m5 Z( a( h<P><FONT color=#ff0000>函数名: lock </FONT>
, z/ o0 @. s3 x. t功 能: 设置文件共享锁
" H0 {; P, o* b" n用 法: int lock(int handle, long offset, long length);
# s6 j" O+ C2 U) m" H程序例: </P>
. k- ]* e7 }  I6 x, T7 b<P><FONT color=#0000ff>#include <IO.H>" j* ]' W' J3 K4 R0 }' p$ K  t
#include <FCNTL.H>
- v& t% C, R4 L0 X9 @#include <SYS\STAT.H>
) W" u# E/ K! c% X9 z#include <PROCESS.H>
" r! W; G6 ?! ]6 i#include <SHARE.H>
' P4 g- _; a: E" _#include <STDIO.H></FONT></P>3 q2 U6 E" H: u& T1 F
<P><FONT color=#0000ff>int main(void)
/ a$ W& h( R1 h1 g/ l6 h{ ! R: I9 W3 m! V8 {0 M
int handle, status;
0 y( [7 X8 t( B0 ilong length; </FONT></P>
$ j( e3 g6 I) p+ G' \# Q% Y* Z1 u<P><FONT color=#0000ff>/* Must have DOS Share.exe loaded for */ 3 R5 H3 V* O2 Y$ Q! J9 e% k" \" f6 w% n( j
/* file locking to function properly */ </FONT></P>
: \  R( d/ D9 x% Z4 K$ N<P><FONT color=#0000ff>handle = sopen("c:\\autoexec.bat",
5 ~3 s, l. k0 n, i; M8 }! c: m( YO_RDONLY,SH_DENYNO,S_IREAD); </FONT></P>* E' @0 o3 _/ e3 P2 ~
<P><FONT color=#0000ff>if (handle &lt; 0)
4 V7 V* h5 N6 y; ~0 J+ w* b{ 6 ^' L/ n" D4 b8 B
printf("sopen failed\n");
5 W; x4 v* M4 i  K* D4 B8 bexit(1); 9 R; A5 H0 ~4 Q
} </FONT></P>( s& X  _/ ^7 |0 E
<P><FONT color=#0000ff>length = filelength(handle);
" {- b) _9 H, d0 Vstatus = lock(handle,0L,length/2); </FONT></P>" t' M/ f6 o. N( I, }- c# h
<P><FONT color=#0000ff>if (status == 0) # t* }' ^0 S5 d! @! }7 v! W- ~1 a( ]
printf("lock succeeded\n"); / G' G  O+ h: T5 H+ V6 N
else
) ^4 H* ]: {+ ^# dprintf("lock failed\n"); </FONT></P>
% y5 Y8 t  B9 @' C, _6 ]<P><FONT color=#0000ff>status = unlock(handle,0L,length/2); </FONT></P>5 Q" m+ Z. u1 \
<P><FONT color=#0000ff>if (status == 0)
5 Q8 K4 L/ N! Iprintf("unlock succeeded\n");
8 v$ H+ l) ^2 |: E) R# ^else
$ X0 M; K) P/ P# b. |0 ]' cprintf("unlock failed\n"); </FONT></P>
0 u3 v+ {% `5 _# W2 \# O6 w<P><FONT color=#0000ff>close(handle); " d4 B8 b: T7 V! w( P# c
return 0;
- g  L( [$ Q  g6 J" R8 d5 @} ' A0 F  B; R. z5 K& ^: U8 S
</FONT>% i) T7 i7 W! ?# G
</P>$ Q9 H/ n5 Q3 V2 h) [( d
<P><FONT color=#ff0000>函数名: log </FONT>$ u& }/ j+ Y, k* W7 O
功 能: 对数函数ln(x)
/ Y$ i7 M9 ]$ e. m7 h8 u/ u$ _  U用 法: double log(double x); % X8 R6 P7 d( N" e
程序例: </P>
: H6 }, G) {8 q8 s, `: b6 g5 e<P><FONT color=#0000ff>#include <MATH.H>
1 Y& {' i- [# m: f#include <STDIO.H></FONT></P>
- s5 f- _: |2 I4 K; {5 c" f<P><FONT color=#0000ff>int main(void) 7 \; }4 K% t" q
{
1 c5 s! x' a$ f3 m* T8 P5 G' Sdouble result;
1 G! R1 Y! e' G6 Xdouble x = 8.6872; </FONT></P>
, ]5 \7 q2 y5 F<P><FONT color=#0000ff>result = log(x);
% `! I! }! G' V# r1 D: Xprintf("The natural log of %lf is %lf\n", x, result); </FONT></P>
2 h# X4 K. R# E* y, d<P><FONT color=#0000ff>return 0;
5 d$ n+ g1 ?; H- o# |: I} , F/ @" n% l& O: G1 T

# N& ~$ Q$ B' q9 S% a9 l' S/ L: ^4 l</FONT></P>
* S/ G1 u2 N, u# ?6 n$ A* I% X<P><FONT color=#ff0000>函数名: log10 </FONT>
! G6 ?0 \9 m2 Z( S! R2 y功 能: 对数函数log
* m9 \* W1 \9 o6 z( @/ z用 法: double log10(double x); 9 |9 z: k$ d0 e( _3 Y( a! D2 R
程序例: </P>
0 o# Q* L( U; R& n<P><FONT color=#0000ff>#include <MATH.H>4 u* o7 F2 r0 t' ^* ~
#include <STDIO.H></FONT></P>
3 G2 T/ \5 y2 r1 F: ^/ [<P><FONT color=#0000ff>int main(void)
* e- |6 |5 o& X* y1 [{ 0 [" i1 J: q: R) Q  H& x/ p
double result;
  I4 u( a8 Y2 L) @double x = 800.6872; </FONT></P>/ L2 d) W; |/ b# D+ ~" D/ }1 h3 V
<P><FONT color=#0000ff>result = log10(x);
1 o: `) b' v" Y, |5 m+ k1 j0 w7 jprintf("The common log of %lf is %lf\n", x, result); </FONT></P>
, `6 G. X4 F6 ]0 ^7 e<P><FONT color=#0000ff>return 0;
9 t; }! O, {, _2 M. B* {}   Y! }: R  B" W1 l

! b/ B) N8 A  H9 o</FONT>
- s$ s: |" w1 |) V( R</P>
) m8 {0 e1 a- N, q9 p<P><FONT color=#ff0000>函数名: longjump </FONT>. H1 @- Y. Z2 x7 ^
功 能: 执行非局部转移
' m0 a$ a" h* Z2 U) x2 H用 法: void longjump(jmp_buf env, int val);
6 P, f/ E1 u1 [程序例: </P>
: P( z* E3 [; ?: ~0 {& l<P><FONT color=#0000ff>#include <STDIO.H>
! q8 y! O1 \# x7 |' {: j) o#include <SETJMP.H>
, ~/ M9 r5 M9 B& n( P  ]#include <STDLIB.H></FONT></P>
9 E+ k* k" E" s$ T<P><FONT color=#0000ff>void subroutine(jmp_buf); </FONT></P>
- j5 o% s+ o, F2 N7 O* g+ i<P><FONT color=#0000ff>int main(void)
) V; @+ A4 H4 s2 O{ </FONT></P>/ D0 H* t: q% W9 a6 v! b/ X
<P><FONT color=#0000ff>int value; ' l. l" b& A5 h/ x0 [- U+ _! D
jmp_buf jumper; </FONT></P>1 R& T7 X0 c, s1 J
<P><FONT color=#0000ff>value = setjmp(jumper); 8 u: A- x: ^- b) c
if (value != 0)
6 ^0 C. [* K) j& o{
, X" \" Y' F( \$ f) o" I% V1 fprintf("Longjmp with value %d\n", value);
- c0 t  W$ n9 `+ G, }exit(value); % r. q1 f/ |: o9 L1 k+ C
}
( J  X! E) s9 c" a% J% sprintf("About to call subroutine ... \n");
4 ^# T) n0 D* fsubroutine(jumper); </FONT></P>
. O( a6 j% q( q1 L<P><FONT color=#0000ff>return 0; 2 n* D1 ?7 Y! D4 t9 a0 K8 n# E6 m
} </FONT></P>
7 J1 Z! g! }+ P4 B# @( n6 ]" i<P><FONT color=#0000ff>void subroutine(jmp_buf jumper) , S/ }8 J0 j8 t* \9 `& @
{
7 G* e8 e6 {" }( S. u4 o& tlongjmp(jumper,1); 6 k# H% r& R$ b2 k2 ^
} : Z- H6 o. g  X% B: F; E8 i% r# T, d

9 R3 u2 Q8 U; M& x, l</FONT>
" o/ y1 X+ c7 T' \7 P$ ~</P>
7 G' Z3 j; J+ R9 g<P><FONT color=#ff0000>函数名: lowvideo</FONT> 1 T9 }( Q* T5 Y4 l
功 能: 选择低亮度字符
# N9 d" Z8 g2 u# j$ w用 法: void lowvideo(void); ; C, g" l; a) E6 w
程序例: </P>  Y) A% `2 x- J& G9 W
<P><FONT color=#0000ff>#include <CONIO.H></FONT></P>
/ @) Q; l  @6 y7 i0 g# A' i<P><FONT color=#0000ff>int main(void)   l; f  v2 \, C( H# H# o4 _
{
, o3 A1 p* m5 ~/ Cclrscr(); </FONT></P>1 d" v: [) Y8 [8 L/ N' Z, v) D
<P><FONT color=#0000ff>highvideo(); ) W5 u2 |7 r$ o& y
cprintf("High Intesity Text\r\n");
, O& N4 t" ^0 \4 P5 clowvideo(); 2 W( J, R5 L. b
gotoxy(1,2);
; K' `9 V0 Y; ~% lcprintf("Low Intensity Text\r\n"); </FONT></P>
) M4 s+ a9 S: n5 h7 \$ L<P><FONT color=#0000ff>return 0; + I& E; n. x2 w7 I- Y5 `$ [. V
}
/ y% W: v2 o: T  h( M; T% m) H, {, b% `7 `- |0 `, b+ W' \
</FONT>4 L/ |3 }) j; r; k
</P>; d2 Q( K$ o1 l; K8 z
<P><FONT color=#ff0000>函数名: lrotl, _lrotl </FONT>
3 I& N* u1 u8 \$ g功 能: 将无符号长整型数向左循环移位   @( P# j; c# L$ W: f9 N1 c& D9 E; b
用 法: unsigned long lrotl(unsigned long lvalue, int count);
. L, {+ {2 ]) y# l6 v; xunsigned long _lrotl(unsigned long lvalue, int count);
% @1 {- `! {6 j. b* J8 j9 o程序例: </P>, X- n' j+ T- R( D5 @9 e0 u
<P><FONT color=#0000ff>/* lrotl example */
# C9 T, y5 V( F$ R#include <STDLIB.H>
: y* y; R/ O1 u- R# b- |#include <STDIO.H></FONT></P>
" b6 X* `3 H  s$ L+ d9 m<P><FONT color=#0000ff>int main(void) 1 t0 g; B) B3 M8 g
{ 0 c6 C2 E" T% i! J) p
unsigned long result;
8 q4 M" f. U% V$ @0 runsigned long value = 100; </FONT></P>+ U- K# F, r1 T8 |
<P><FONT color=#0000ff>result = _lrotl(value,1); 3 p- M0 I; c9 F( A
printf("The value %lu rotated left one bit is: %lu\n", value, result); </FONT></P>: r! p9 `8 I) b
<P><FONT color=#0000ff>return 0; : a6 ~; C: I) _3 z! Y- W* A
}
! K8 f1 v+ `( H3 [% e9 f: P9 A. p* ?</FONT>* e+ b6 i  g+ O0 D
</P>
3 S2 c. P7 X$ ?1 y" Z<P><FONT color=#ff0000>函数名: lsearch </FONT>
7 S1 U2 }; @) q/ V% z功 能: 线性搜索 . j& E' v+ H9 E( w; p& e
用 法: void *lsearch(const void *key, void *base, size_t *nelem,
1 T/ w5 d' s. z8 Q. y+ @size_t width, int (*fcmp)(const void *, const void *));
9 P3 w$ U6 A: z程序例: </P>
% F  o# J6 S& J. N  S; L$ G9 ^<P><FONT color=#0000ff>#include <STDIO.H>- x+ A3 L2 b) Q! `! T! ~0 o
#include <STDLIB.H></FONT></P>' M5 R# h0 Q: W/ F3 B
<P><FONT color=#0000ff>int compare(int *x, int *y)
+ d" v) |/ A. R+ Q5 D  [( l{ . O- z" x8 ~: f. ~3 z) i! h" X
return( *x - *y );
2 }" ^5 b7 W! |/ ^6 D: d. |$ B} </FONT></P>, G, n9 }# y6 {4 g+ ]
<P><FONT color=#0000ff>int main(void)
1 P8 \! h( J! L{ ! v7 o; Z' w* h7 `; f9 q
int array[5] = {35, 87, 46, 99, 12};
( R/ }1 u2 x" x7 R5 y) L; Qsize_t nelem = 5;   U' C( G+ V6 a0 S6 C/ H
int key; 2 G) `+ [# ~! \. Y5 T
int *result; </FONT></P>! g% g9 c4 I6 X. g- }* M
<P><FONT color=#0000ff>key = 99; . u$ X' n( f  h: A
result = lfind(&amp;key, array, &amp;nelem, " n' K1 {" Q! o; D$ O6 ^0 R& B
sizeof(int), (int(*)(const void *,const void *))compare);
8 j0 P* |, C  G  h% sif (result)
9 H# r. a9 d" ^5 }9 L5 F* Dprintf("Number %d found\n",key); ) d. x! I% H6 c; D5 t9 d0 T& u
else
1 M+ f+ ]5 c, vprintf("Number %d not found\n",key); </FONT></P>- @5 u0 m7 y/ B& {
<P><FONT color=#0000ff>return 0;
% k; c- D0 P: C0 b, [1 Q5 \} + v, s7 x5 D$ W6 A

$ T7 t0 J9 i. J, _+ b* y</FONT>" m$ M& Z4 L# d. z# j
</P>
# R! r9 D: M, d<P><FONT color=#ff0000>函数名: lseek </FONT>
! n7 Y7 Y$ V& b, J功 能: 移动文件读/写指针
# V& {2 J- H- U: J1 V用 法: long lseek(int handle, long offset, int fromwhere); ! `" {* Z$ q+ y" i
程序例: </P>2 r- N% i/ Y3 h' k
<P><FONT color=#0000ff>#include <SYS\STAT.H>9 A, d1 x" f  N' a, \: L: i' S
#include <STRING.H>
# Z( L. E( W9 t: c$ s6 L#include <STDIO.H>& i1 c4 }' G5 }7 ?
#include <FCNTL.H>* h8 ]# d2 A* T% D
#include <IO.H></FONT></P>3 }& T$ N: {0 N( N6 u) Z6 i
<P><FONT color=#0000ff>int main(void) 9 `" ~" H, g3 B7 U
{
! J& `) J$ C/ b- K# I  C: Kint handle;
! D* ]5 W: ]- H1 z/ C" schar msg[] = "This is a test"; + l1 E7 B3 T, I: F
char ch; </FONT></P>
9 |" t4 d  X7 T7 A<P><FONT color=#0000ff>/* create a file */
1 G# H; t9 x( J! phandle = open("TEST.$$$", O_CREAT | O_RDWR, S_IREAD | S_IWRITE); </FONT></P>
0 D9 h7 |7 ?3 U: p) Y. L2 U1 u<P><FONT color=#0000ff>/* write some data to the file */
! f( g, A! v. M  Kwrite(handle, msg, strlen(msg)); </FONT></P>+ f  `, k2 b, f2 W
<P><FONT color=#0000ff>/* seek to the begining of the file */ : X: O" [, v. h- M6 W
lseek(handle, 0L, SEEK_SET); </FONT></P>
. f* @, X# E2 q$ N7 L<P><FONT color=#0000ff>/* reads chars from the file until we hit EOF */
3 f8 ]- V: L! ]do
% p) P4 \7 O- B  _% Z{ ! E& P$ y" @8 j+ Z' E  }1 ^! C9 [4 M
read(handle, &amp;ch, 1); % }/ D. o$ e, T& \, s" m
printf("%c", ch);
+ Y6 E4 h. p7 d3 h: A( ?& D: ~} while (!eof(handle)); </FONT></P>5 k& q7 X# _9 N: J7 E9 f' D8 k8 w
<P><FONT color=#0000ff>close(handle);
7 E( z( \7 A' M1 L4 E: greturn 0;
3 R! L+ O" S/ ?1 F9 T) S+ e} 6 [+ B' Y+ ]' i
</FONT></P>+ o% ^% Y: w9 Y0 `
<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-4-20 09:55 , Processed in 0.409815 second(s), 52 queries .

回顶部