QQ登录

只需要一步,快速开始

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

函数大全(l开头)

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

823

主题

3

听众

4048

积分

我的地盘我做主

该用户从未签到

发帖功臣 元老勋章

跳转到指定楼层
1#
发表于 2004-10-4 02:58 |只看该作者 |倒序浏览
|招呼Ta 关注Ta
<><FONT color=#ff0000>函数名: labs </FONT>
( p0 u+ y& P/ ~% F+ r& t" F3 S用 法: long labs(long n);
7 n8 \$ w: I( P6 r1 u程序例: </P>; Y  L4 k: d* `/ }9 y, r
<><FONT color=#0000ff>#include <STDIO.H>
' w( G2 w* j* w8 r; w3 w$ q#include <MATH.H></FONT></P>. b$ t8 g0 e8 S5 q2 V1 p5 t9 n
<><FONT color=#0000ff>int main(void)
8 P3 ]% m/ d" W2 n4 h{ ' c/ S* c: c- K4 x0 B
long result;
- z; x2 j. o. h4 Mlong x = -12345678L; </FONT></P>
! {6 i; Y, C% o9 z) w<><FONT color=#0000ff>result= labs(x);
, r9 b0 G* T3 z: Cprintf("number: %ld abs value: %ld\n",
$ ?6 B7 a3 r+ ?& _$ m! ox, result); </FONT></P>( D" D# s7 ^; A' w3 r3 [1 u
<><FONT color=#0000ff>return 0; 0 g# ^( w1 P) w
} . e# F! Q! U5 ^
</FONT>% ?2 v2 g% v' G. A
! ~/ l' l1 ^5 n) x7 H1 c
</P>8 t$ O+ u' c. k$ {' X6 P( J" p( J
<><FONT color=#ff0000>函数名: ldexp </FONT>
- r3 r" {2 r- P功 能: 计算value*2的幂
, Q6 \* ~7 |& a7 I用 法: double ldexp(double value, int exp);
4 ]/ J( u4 M& v3 q. x$ f程序例: </P>
5 K, B  |( F2 z1 r! A<><FONT color=#0000ff>#include <STDIO.H>
: _- S- Q/ k% e% L#include <MATH.H></FONT></P>
0 a2 i" u/ S' F+ z<><FONT color=#0000ff>int main(void) " Y, Q. _& f6 a' U, D
{
0 m$ C( E% o) H) `5 wdouble value; 8 O% |! T2 Y) l6 F& c0 S
double x = 2; </FONT></P># }5 X. P" i8 X+ l0 O1 t
<><FONT color=#0000ff>/* ldexp raises 2 by a power of 3 " I; V/ L8 e) O4 i( v8 }/ M
then multiplies the result by 2 */
8 J7 N4 x( B. p+ Rvalue = ldexp(x,3); 6 ]9 t  s$ H& e4 q2 c- W$ D
printf("The ldexp value is: %lf\n", " @, X# v% Y3 T0 L, ^
value); </FONT></P>, j$ {! @: L: d9 p5 J, s$ R- b
<><FONT color=#0000ff>return 0;
7 m& D! _  Y# c8 Q) B7 m6 c}
$ Z, w& ~9 G' q6 b& @. Q5 @5 n, ~( j3 {4 ~7 j. o, D$ s
</FONT></P>
" ^% ~0 i) [( a+ K<><FONT color=#ff0000>函数名: ldiv </FONT>+ e3 j9 ^! G6 g" H) m
功 能: 两个长整型数相除, 返回商和余数 & i5 r4 I: a5 ^
用 法: ldiv_t ldiv(long lnumer, long ldenom); 3 m1 H5 `3 N8 o6 a* T
程序例: </P>
: N' `- T4 g9 w<><FONT color=#0000ff>/* ldiv example */ </FONT></P>2 N" O9 |& V$ k3 f0 S. |
<><FONT color=#0000ff>#include <STDLIB.H>
0 J1 n  L- ^# v7 h#include <STDIO.H></FONT></P>
# k0 B1 t" H5 O/ M$ z8 G<><FONT color=#0000ff>int main(void) ! V; _$ H: P' a  d! }* k
{ # X! C. i- P) n3 |' i3 Q
ldiv_t lx; </FONT></P>  @7 i/ v  V3 f
<><FONT color=#0000ff>lx = ldiv(100000L, 30000L);
  \4 W" v, [$ g& gprintf("100000 div 30000 = %ld remainder %ld\n", lx.quot, lx.rem); - k; C  l$ ]: l3 m+ C
return 0; </FONT>
$ l! w& Y5 L0 K6 r<FONT color=#0000ff>} </FONT>
& n4 A, Z, e5 K! V: |* G) U8 Z</P>% {6 w0 r! R5 W, @
<><FONT color=#ff0000>函数名: lfind </FONT>
0 y2 a6 L8 `# ~" P" i% ]4 [2 k功 能: 执行线性搜索 - e% H6 e9 W1 _1 P$ ~6 _! F" X
用 法: void *lfind(void *key, void *base, int *nelem, int width,
# L1 F+ h' [8 M& Pint (*fcmp)()); ! Y, u; C- t* C* u
程序例: </P>; D" G. `- u, }3 s
<><FONT color=#0000ff>#include <STDIO.H>. y. ]; _$ v2 H% c* }6 e. A9 C
#include <STDLIB.H></FONT></P>+ N5 }( ]7 D* M  k( y9 n$ U, S7 Z
<><FONT color=#0000ff>int compare(int *x, int *y)
* S! m3 O- F0 y{ $ v$ M/ O: b. N$ D3 [( |
return( *x - *y );
% Q) B7 f3 i5 ]/ Y' A5 ~} </FONT></P>; [6 w- h4 u' V- d
<><FONT color=#0000ff>int main(void)   {' T% Z; }" r2 S+ E
{
) j4 c/ L5 c0 i$ `int array[5] = {35, 87, 46, 99, 12}; 0 g8 M* C; u+ F/ }4 J0 n+ q$ E- N/ x
size_t nelem = 5;
, \% _/ y3 e* b% K; s5 t* t! Dint key; 0 S! q; f' X2 q
int *result; </FONT></P>" X( F+ u5 B. |) a& h* R. s/ a
<><FONT color=#0000ff>key = 99;
9 P( S2 Q2 ~" o3 ?2 [result = lfind(&amp;key, array, &amp;nelem, % _. Z3 [8 Z, l' k1 C
sizeof(int), (int(*)(const void *,const void *))compare);
$ f9 J% g1 k, c) d' [+ M1 l" ^5 ]5 tif (result) / b" t9 I5 ?/ o2 |  p
printf("Number %d found\n",key);   P' n" F) K6 s: V( ~2 Q/ [2 ~
else
* g% d8 Q8 W6 k6 Jprintf("Number %d not found\n",key); </FONT></P>& i' t: r( V( Z/ k* Z
<><FONT color=#0000ff>return 0;
6 e- C, q2 _  k2 |6 Y* y0 h} </FONT>
/ K( S, `/ f9 c- c8 s8 m2 x$ C
3 _! F8 I* N7 {3 u</P>
" r* E. h/ [& }7 ?2 k% B<><FONT color=#ff0000>函数名: line </FONT>
, N( |7 b7 l4 Y0 Y" C7 U功 能: 在指定两点间画一直线
* e" l; n1 P4 W; O- L! x  J- Y用 法: void far line(int x0, int y0, int x1, int y1);
7 B# {% W6 n) P6 C# V+ y* ^程序例: </P>( U* B+ W: T1 Z1 r" p% p
<><FONT color=#0000ff>#include <GRAPHICS.H>( B: ]% C* a" n
#include <STDLIB.H>
8 _+ `  H& ?; O! b1 g& s. b) {* M#include <STDIO.H>) L: T& o* e' z' \
#include <CONIO.H></FONT></P>
0 A$ \/ L& L" P3 T/ ]<><FONT color=#0000ff>int main(void) 1 q( `% P4 g# W/ D* s+ S% @6 h
{ ; p; K. S% }/ ]; p
/* request auto detection */
; ?5 o) L& i" N( E- Z$ \int gdriver = DETECT, gmode, errorcode; 9 U7 m+ I* Y# L% @
int xmax, ymax; </FONT></P>
% V1 Z9 H/ M+ B7 z; V6 ^<><FONT color=#0000ff>/* initialize graphics and local variables */ 7 ^' Z, p8 F" g( f: v9 i1 o
initgraph(&amp;gdriver, &amp;gmode, ""); </FONT></P>" }. W8 @- N( {0 w; @, b9 c
<><FONT color=#0000ff>/* read result of initialization */ 1 Z) x0 j# j, {0 b' b' L
errorcode = graphresult(); 7 ^$ r& O& w# Y, }* Q
/* an error occurred */
" Q& N  d) L/ Aif (errorcode != grOk) 2 ~0 v2 t' b1 a6 r/ G
{ 8 U$ }+ N7 H* t1 _* G* ~) V3 A
printf("Graphics error: %s\n", ! g& s/ Z+ M$ c+ Q1 K& H
grapherrormsg(errorcode));
. a/ [! b- W/ M1 v2 o$ k0 D' {printf("ress any key to halt:"); 1 T( w5 a# ?! ~: o7 M, ?6 P6 C6 b
getch(); ) R# f/ }: k" y5 b: |7 f0 j# S
exit(1); & G; U/ I8 J" Q+ J1 E$ K
} </FONT></P>
# Y: Y3 ?$ j9 U6 f' T/ S  L<><FONT color=#0000ff>setcolor(getmaxcolor());
5 j' M5 U) F' }  [xmax = getmaxx(); - l  z6 C/ u9 @- w% H
ymax = getmaxy(); </FONT></P>/ o4 _7 C& Q* z, Q, R
<><FONT color=#0000ff>/* draw a diagonal line */
1 g" X, {4 C: l9 G1 c; N5 z3 [2 kline(0, 0, xmax, ymax); </FONT></P>
' F/ a1 U: }& ]2 j<><FONT color=#0000ff>/* clean up */ # U# G. s! s" I  z7 e2 |
getch();
- G' h* _; A% Qclosegraph(); $ a$ x% H5 p- A7 x: T
return 0;
' b1 Z8 i# C) }3 j, v- q" K# ?" E9 Y} , N% _  g- J# x& {2 r! C  g; m& L& X
</FONT>
+ S& z0 v9 \! ~8 B% z</P>
8 s, V" U% [, }( o; f& e<P><FONT color=#ff0000>函数名: linerel </FONT>
- N- M/ x( s3 K7 o* u0 I! U# r功 能: 从当前位置点(CP)到与CP有一给定相对距离的点画一直线
) H& f* N3 M: o+ D+ s) W用 法: void far linerel(int dx, int dy); 9 ^7 m4 D! c& @- l8 H
程序例: </P>
, N" e  T' q. e6 W<P><FONT color=#0000ff>#include <GRAPHICS.H>
& P  ~1 t2 f+ J( \+ i# P  s( J: A6 d#include <STDLIB.H>
. M& x; n+ j+ c$ ^& E! D& L#include <STDIO.H>3 i1 ?5 b) X6 c- D3 v4 q( O
#include <CONIO.H></FONT></P>5 O! k  R8 h, `: b3 V
<P><FONT color=#0000ff>int main(void) & R! D6 \1 {) [6 O
{ / _+ \2 g+ p- [: I
/* request auto detection */
! J9 G* D6 U. g- ?int gdriver = DETECT, gmode, errorcode; 3 v3 r" \, p' W! |7 h
char msg[80]; </FONT></P>3 E+ u# N0 A; P9 w& g6 Z' ?
<P><FONT color=#0000ff>/* initialize graphics and local variables */
% ]) U! f" ]. Q4 V# @0 o$ pinitgraph(&amp;gdriver, &amp;gmode, ""); </FONT></P>( j) ]5 f$ x4 a
<P><FONT color=#0000ff>/* read result of initialization */
0 |1 \  Y1 P# D2 t; k) perrorcode = graphresult();
$ |' d. i( w! P; S/ c4 B" `if (errorcode != grOk) ! f7 b) ?9 r4 E8 q% a2 d$ L; b2 J$ s7 q
{ . o$ ~7 x( _* |9 i9 J, o/ s" ~
printf("Graphics error: %s\n",
% r% Q" q0 K) ~, O3 V5 v* z- `6 ~' Ggrapherrormsg(errorcode));   A4 n$ U: D5 v( A  ?8 E8 {
printf("Press any key to halt:"); 3 D4 g- b; T2 \# S5 _4 |* }
getch();
& y$ |6 n6 G1 v# A" g+ G' k& m* `exit(1);
! o* O" L0 V8 q# p% I3 d} </FONT></P>
- k9 m7 g7 ]) q" n8 P<P><FONT color=#0000ff>/* move the C.P. to location (20, 30) */ - h  l( P0 ^5 R' Z. I
moveto(20, 30); </FONT></P>$ U2 u! g1 b1 ]! @
<P><FONT color=#0000ff>/* create and output a 9 u/ m8 Q3 p$ r. W! E
message at (20, 30) */ ; w) M9 v1 t3 O0 M, K3 ~4 s
sprintf(msg, " (%d, %d)", getx(), gety()); ) ?( s8 w, Y$ b6 P
outtextxy(20, 30, msg); </FONT></P>7 t  _- ~6 e' y( M( A' |; `/ Y5 e
<P><FONT color=#0000ff>/* draw a line to a point a relative ' q" ^: P9 ~0 c, n# `
distance away from the current
2 r* ?( e: Z% p; C' kvalue of C.P. */
- R& Q2 e8 O8 H& Y1 I+ Blinerel(100, 100); </FONT></P>
; I% Y# Q5 o+ B* [6 Z<P><FONT color=#0000ff>/* create and output a message at C.P. */ , z$ p9 b' T$ F- ~& `( H
sprintf(msg, " (%d, %d)", getx(), gety());
# U' _7 O: z; X% S/ j$ aouttext(msg); </FONT></P>
: Z9 R7 n) r8 a: f% ^* L; v<P><FONT color=#0000ff>/* clean up */ 5 ]" C' H) \: |
getch(); ) [. j- u" C/ ?5 o
closegraph(); 4 }4 [3 i' q& p3 y
return 0; ; y# H- U# m; L3 t
} </FONT>
* V) N8 O  w, n</P>
- @0 U! }" D/ ~4 x2 d<P><FONT color=#ff0000>函数名: localtime</FONT>
( \9 v" S* e; r# R2 n& Y/ O* C功 能: 把日期和时间转变为结构
% G$ F, l$ g" A( x0 G8 g用 法: struct tm *localtime(long *clock); ! O  K% o& \+ ?7 X& E9 o& j" K/ g
程序例: </P>, p" b, Q) T5 _  V
<P><FONT color=#0000ff>#include <TIME.H>
& F- T" n' [" q5 |#include <STDIO.H>' J$ b' c1 T( {0 @$ ?8 G8 Z, {0 M8 x; h
#include <DOS.H></FONT></P>, U1 y5 r- S1 u3 Z. z$ {
<P><FONT color=#0000ff>int main(void) 3 O) _3 \$ _# z7 j3 G% ?9 [3 o
{ 1 e& U1 f5 d9 a0 N' G4 x9 L8 S) L
time_t timer;
; ^8 [' |" B1 j. B* v5 G2 Wstruct tm *tblock; </FONT></P>
; X; E" W5 D% ~# Q# r% F2 l% D. E<P><FONT color=#0000ff>/* gets time of day */
" f) E/ i7 O# ltimer = time(NULL); </FONT></P>' ?9 e$ ~9 H( ^& l
<P><FONT color=#0000ff>/* converts date/time to a structure */
4 O0 k+ p5 {3 u" e/ W1 r- A- J  Ttblock = localtime(&amp;timer); </FONT></P>. o( P. `$ F6 ?. m
<P><FONT color=#0000ff>printf("Local time is: %s", asctime(tblock)); </FONT></P>
4 R) i7 J6 G% J<P><FONT color=#0000ff>return 0;
$ i6 K) S( ~. h2 I" D  S0 _} * P6 o) q1 W2 p; F& a) F. p

4 O+ ]% G$ e8 h
' L# a/ ]) `8 _. x8 j</FONT></P>
& t) p- r/ O5 O$ a% {  G0 `<P><FONT color=#ff0000>函数名: lock </FONT>7 ^& L9 k$ @8 P* `' {" M) _
功 能: 设置文件共享锁 $ _& b5 d* K8 A6 d' E  {. G
用 法: int lock(int handle, long offset, long length); ' M  n, K' \" x5 b
程序例: </P>$ Y) w" F9 `% a# c0 D
<P><FONT color=#0000ff>#include <IO.H>- d- f/ S* h/ G" c6 R
#include <FCNTL.H>
9 A. T% a7 ]6 j* I5 ^5 V! p#include <SYS\STAT.H>, n, ~! V- l: }4 M: D( ^" N
#include <PROCESS.H>7 K5 b+ V# U; t4 X
#include <SHARE.H>
7 I2 B+ g6 J: s8 o1 U#include <STDIO.H></FONT></P>
8 l' o( B5 A, _# ]( I- r<P><FONT color=#0000ff>int main(void) 2 x$ B4 _, B( k0 ^, y
{ 6 w2 `- I- S. l& {& D
int handle, status; $ R* y/ e3 R$ N5 y3 ~. l
long length; </FONT></P>1 T4 t8 w2 a" Q) O) W1 Q% G4 {7 k. k
<P><FONT color=#0000ff>/* Must have DOS Share.exe loaded for */ 5 P) B. @/ A. r1 Z' w
/* file locking to function properly */ </FONT></P>9 b& \  r) [. Y5 z& P
<P><FONT color=#0000ff>handle = sopen("c:\\autoexec.bat", ' Y  u; |6 n. ]: [" X5 V  H6 r
O_RDONLY,SH_DENYNO,S_IREAD); </FONT></P>7 ]' V) F7 P4 @, b5 \* h
<P><FONT color=#0000ff>if (handle &lt; 0)
' W$ b8 j1 n" _$ X  \{
6 H) s! _" c" Oprintf("sopen failed\n"); 9 S! i. _! ^" t+ ^+ |) W( C/ d
exit(1);
& u% z- {3 G5 U) Z$ q$ W} </FONT></P>
% \; x* G3 w, [5 r9 K% [( x3 t<P><FONT color=#0000ff>length = filelength(handle);
# O: J. ?; X8 e8 \! Jstatus = lock(handle,0L,length/2); </FONT></P>
4 M7 i: D* k9 r4 R5 J<P><FONT color=#0000ff>if (status == 0) 4 r5 K, q/ Z; u  g0 |) d
printf("lock succeeded\n"); 9 _1 [- {- o$ w8 W
else $ |5 K5 J- A/ `9 J7 G2 Z2 u* r  j
printf("lock failed\n"); </FONT></P>
% y7 d6 _# B' C<P><FONT color=#0000ff>status = unlock(handle,0L,length/2); </FONT></P>1 a# r: J+ c2 c' |, }1 o
<P><FONT color=#0000ff>if (status == 0)
# ]6 k7 }7 z; s( X  Hprintf("unlock succeeded\n"); ! O5 y6 {; K$ i
else ( v* [8 a. D* e: Q0 t+ q
printf("unlock failed\n"); </FONT></P>
4 B( k) g. h6 b) L, b<P><FONT color=#0000ff>close(handle);
9 @5 |+ q: _, s, h; [1 vreturn 0; 8 F. A5 x/ m* w
}
2 S& I4 v' Z: h6 i</FONT>9 f9 b7 m& J: ~" K7 U! G/ t
</P>1 c; U: f% S% ~& J0 U
<P><FONT color=#ff0000>函数名: log </FONT>
5 R* e4 Y* d3 X. x功 能: 对数函数ln(x)
, V4 ?. o6 o( H) J7 m5 x4 k用 法: double log(double x);
% `5 j) t2 P; G/ p程序例: </P>
3 |  y* K0 D, B; P<P><FONT color=#0000ff>#include <MATH.H>8 w, q  h% z. u; y
#include <STDIO.H></FONT></P>: l3 j( c% L) H# ?" u4 q$ L
<P><FONT color=#0000ff>int main(void)
- ]% s; W. x& ]9 a$ |{
, P8 D# B9 G/ D# {1 V7 ~9 k# tdouble result;
- c0 G/ y/ z  U& G  ^double x = 8.6872; </FONT></P>* P4 y0 S* ]4 [3 B; S( }
<P><FONT color=#0000ff>result = log(x); # {) l) Q: C; r6 [0 L% x
printf("The natural log of %lf is %lf\n", x, result); </FONT></P>
6 G, C7 R" T  R' W$ p- Z/ @<P><FONT color=#0000ff>return 0;
; H5 c0 o2 ]' G* V7 L5 \1 o} + K: Y& y2 L* _* j/ F. W

  [! p( K, I( Q" |</FONT></P>
8 D+ [$ i# ~+ m<P><FONT color=#ff0000>函数名: log10 </FONT>
  a% m: q3 \) `5 c* l" }功 能: 对数函数log " U& ]* L3 D& s* u* e( `/ c/ F
用 法: double log10(double x); * |6 _7 m# W! g. ^; L/ ^% I
程序例: </P>, o: \  [8 y. Z. d$ R
<P><FONT color=#0000ff>#include <MATH.H>
5 W  w+ e3 s& q# f/ g- l#include <STDIO.H></FONT></P>- t# a$ k: t, G3 |+ K
<P><FONT color=#0000ff>int main(void) ' H/ u) k, P' f; r7 U+ n
{
7 ]% a2 ~5 a! d0 ?double result; 2 N1 B. b5 v4 G3 ~' e8 D" d& }' i
double x = 800.6872; </FONT></P>
/ P* x6 \- i& f. N% j; ~<P><FONT color=#0000ff>result = log10(x); . {* W4 l7 S, S. U
printf("The common log of %lf is %lf\n", x, result); </FONT></P>
% }6 Q$ `" g6 B" u* M% h, _<P><FONT color=#0000ff>return 0; & ]( {( M! k% A- t' Q( J
} - d! {/ M% n. n  F2 ~, e
5 d) ^0 e) k1 @' S5 {) C
</FONT>3 _3 m7 x9 E9 e" N
</P>
5 \; I9 l$ b4 I8 Y* `# B<P><FONT color=#ff0000>函数名: longjump </FONT>
$ H" q+ [/ ~4 ]" x: h! O2 O功 能: 执行非局部转移 " X) c# X- M4 k6 O) u  W4 i6 E
用 法: void longjump(jmp_buf env, int val); ; ?! g. m- u1 Q9 {  D
程序例: </P>
* X8 L( [2 n/ q+ s<P><FONT color=#0000ff>#include <STDIO.H>
" ]% k$ K4 J6 l9 ^# y0 U#include <SETJMP.H>6 m9 I9 D7 I+ E
#include <STDLIB.H></FONT></P>
+ W( ^* D# S; Z8 f0 z9 L7 c<P><FONT color=#0000ff>void subroutine(jmp_buf); </FONT></P>
, B- `& N! A% p8 t<P><FONT color=#0000ff>int main(void)
9 |$ z8 p5 U% r; l9 |{ </FONT></P>
! ]3 j) O) Y- a1 d, L4 N<P><FONT color=#0000ff>int value; 6 y$ }" I4 ]) ^5 b  Y
jmp_buf jumper; </FONT></P>
- O2 _6 o3 }( Z/ z+ J, M<P><FONT color=#0000ff>value = setjmp(jumper);
5 J) o/ z3 K) E5 q- S  J6 E. X! a& Jif (value != 0)
3 D  ?5 }6 v% w: L{
! R" a/ f9 W) A, u4 e! V; oprintf("Longjmp with value %d\n", value); " N8 g# v8 P9 o, c* t' P2 J% e
exit(value); * U5 L+ j6 m  y* _
}
5 d1 N1 h# T  G# @7 g8 m# J/ Q, Oprintf("About to call subroutine ... \n"); # q3 V* ?, Z- X2 |( G; @' }/ ^1 g2 `
subroutine(jumper); </FONT></P>- O6 ?5 X: K' ?6 f9 F6 X
<P><FONT color=#0000ff>return 0; 8 O1 b) A  T% f4 Z- R
} </FONT></P>
3 u% h% G8 Q8 a3 X<P><FONT color=#0000ff>void subroutine(jmp_buf jumper)
- s: x$ J9 O/ V/ ?: J{
+ X' j" p4 K) U0 [& |longjmp(jumper,1);
7 h( T2 F* w. f- l7 S}
+ m* K) t. o- y! W3 h3 Q' A# e/ m6 D: a& V4 |5 b( ~
</FONT>9 t1 c: S: E% D! L' X5 {  F0 ]0 b, M4 D7 g
</P>) O& D" k4 {6 s! y5 r
<P><FONT color=#ff0000>函数名: lowvideo</FONT> * p0 a7 U$ P' f4 a4 R# o' ]7 }0 t) h
功 能: 选择低亮度字符
. y5 w2 S0 M5 t1 W# b  R4 j用 法: void lowvideo(void); ( d0 u  V& H1 q7 L
程序例: </P>' Y7 H! p- k4 O
<P><FONT color=#0000ff>#include <CONIO.H></FONT></P>1 K6 }6 u# X0 g+ q) e/ n& L+ B
<P><FONT color=#0000ff>int main(void) 2 E& T0 ]3 m+ i/ _( `/ l; ~
{ 4 \, g! D$ A4 n
clrscr(); </FONT></P>
8 s7 q) e5 {% L" G0 [<P><FONT color=#0000ff>highvideo(); / |: J/ e1 Z9 O  z6 t' C% X
cprintf("High Intesity Text\r\n"); , _# H4 ?- P. r4 c/ [0 C
lowvideo(); % n* h5 @- w) Y. P8 v5 t4 z: b2 F  |
gotoxy(1,2); : M2 Y) P( a* s9 a2 P2 P1 e; }& Q
cprintf("Low Intensity Text\r\n"); </FONT></P>0 r8 F3 X6 f0 {" L( H- S& o" z
<P><FONT color=#0000ff>return 0;
* F3 D( f4 R1 F2 _} # n2 x2 S  O& I  Y2 M4 o
. c3 U6 n! P* D) X
</FONT>
+ O% \( X, q: r: F" h: b; [. z</P>: N2 N6 t5 {9 ?" Y
<P><FONT color=#ff0000>函数名: lrotl, _lrotl </FONT>
1 C- Y7 \0 T( u$ {! v8 u功 能: 将无符号长整型数向左循环移位 7 O4 R0 Y) f# W( x8 B, C
用 法: unsigned long lrotl(unsigned long lvalue, int count); & `+ P& f2 f0 F  q2 ~5 F* _2 N
unsigned long _lrotl(unsigned long lvalue, int count);
: y; H: x3 ~: ^6 H. f+ I程序例: </P>) h9 H6 j3 B# p2 V
<P><FONT color=#0000ff>/* lrotl example */ ; X: Y  z' M+ ~1 Y' I% Y/ @
#include <STDLIB.H>
/ t" c9 q& K# [#include <STDIO.H></FONT></P>
1 ~9 z8 C) u. O+ h" b/ a6 G<P><FONT color=#0000ff>int main(void)
$ k- b* D, [5 @5 U- C4 E{
8 ^7 O! B% ~& V: y/ Xunsigned long result;
, p2 X$ Y; B* x$ Tunsigned long value = 100; </FONT></P>' n3 D5 \; H; i. G
<P><FONT color=#0000ff>result = _lrotl(value,1);
: [6 K4 M4 I5 r4 n: X; Q) z6 u+ }printf("The value %lu rotated left one bit is: %lu\n", value, result); </FONT></P>
' m* U2 r7 K6 m7 @<P><FONT color=#0000ff>return 0; 8 N+ ~/ z+ ~0 E! _$ Y+ L
}
/ e! i; [8 _* u+ }" F5 C1 Z</FONT>
; c+ l; ^+ _$ W& a6 A1 F</P>
. o) P! m: u0 _0 E8 \<P><FONT color=#ff0000>函数名: lsearch </FONT>
  b  M. U6 G! G6 e. u功 能: 线性搜索
9 I  z5 H- w4 Q$ p1 Q用 法: void *lsearch(const void *key, void *base, size_t *nelem,
% a- D$ U/ S5 `5 fsize_t width, int (*fcmp)(const void *, const void *));
" J; p: {$ \! n+ _0 W程序例: </P>+ c! w9 q  R# C$ z  z) {; E8 I& W
<P><FONT color=#0000ff>#include <STDIO.H>
( x/ l6 r0 r6 _0 E" }% o#include <STDLIB.H></FONT></P>, r6 M. Q# C& F+ @
<P><FONT color=#0000ff>int compare(int *x, int *y)   Y7 {% ~/ i# P
{
, K8 E/ R( X/ Q8 h) Q2 m! yreturn( *x - *y );
% H  z0 c+ c9 O, L- z* |} </FONT></P>9 M: C) B) s& y  g, K
<P><FONT color=#0000ff>int main(void)
* \4 r. C, V3 a1 o  v{ 5 u+ e. m2 `4 b) Z# a
int array[5] = {35, 87, 46, 99, 12}; & d% Z; |5 g( }
size_t nelem = 5;
- B: U7 S9 H4 M8 L' Vint key; ' K. G( t! ]4 {3 L6 q7 h1 y- y
int *result; </FONT></P>: D+ @& Z3 t* K0 P% p
<P><FONT color=#0000ff>key = 99;
/ P" G) I) r- E: B) gresult = lfind(&amp;key, array, &amp;nelem, 5 M' c4 d& M9 q4 R( |! t" N
sizeof(int), (int(*)(const void *,const void *))compare); , o8 h1 Y" P* Y1 a: O- G
if (result) ; `7 s( ^% Z  c- m2 }6 U) s
printf("Number %d found\n",key);   V, r. \- T8 p- G  `0 d/ o' M) l) h
else 1 V/ W) P2 y2 e( `) ?- c: Q* c' Y- `
printf("Number %d not found\n",key); </FONT></P>
8 F8 w4 K  s- x+ A. w3 i: P- J4 W, |<P><FONT color=#0000ff>return 0; . O2 S9 z& `  X5 \! Q  {3 }2 ?4 M, h
} 3 M0 a" y" k2 @- M/ E4 z" Y

/ X( d0 j; T. p; d' r9 @3 u</FONT>
  K/ `5 Y5 |: z. s</P>1 U2 H. s" C' j3 K2 i
<P><FONT color=#ff0000>函数名: lseek </FONT>* I' X( t2 ?7 e  U8 S
功 能: 移动文件读/写指针 2 E+ Y" R2 J1 S6 Z8 l" P" ]
用 法: long lseek(int handle, long offset, int fromwhere); 9 A' f! Q/ \6 Y2 J1 X
程序例: </P>  V0 ^1 k# E% k1 v; i( B
<P><FONT color=#0000ff>#include <SYS\STAT.H>2 N8 D# N1 k% T. g% [7 _" R, f
#include <STRING.H>, w. l0 h7 [, w9 P2 @0 D$ Q* Q4 p
#include <STDIO.H>
, x  x2 B2 z" @2 ^# j9 P#include <FCNTL.H>! i" o/ ~7 F* d! v4 W/ ?/ |" x! P
#include <IO.H></FONT></P>
% h4 k+ m" ~# q  W, m% j<P><FONT color=#0000ff>int main(void) % F/ s* N& X# `% Y5 d7 Y
{ ! L0 \+ Y: c; e) M
int handle;
0 Z: K! K! v/ M: L5 a/ hchar msg[] = "This is a test";
# m# N2 o/ C' L5 v3 B/ ^char ch; </FONT></P>8 [) q) O8 z4 _  B" ]( Z
<P><FONT color=#0000ff>/* create a file */ / f- h6 F+ @) N8 U& U
handle = open("TEST.$$$", O_CREAT | O_RDWR, S_IREAD | S_IWRITE); </FONT></P>
+ Q+ J6 N! l9 i: ^2 r<P><FONT color=#0000ff>/* write some data to the file */
7 w5 q7 N8 ]1 @, R. Y$ f8 xwrite(handle, msg, strlen(msg)); </FONT></P>
! \( r; N- j  j: I$ U8 m# O# ?! q! @( Q" [<P><FONT color=#0000ff>/* seek to the begining of the file */ 4 |5 y2 A" V, I, h" v: F$ a
lseek(handle, 0L, SEEK_SET); </FONT></P>; N* u2 C6 Y7 J7 Q. a
<P><FONT color=#0000ff>/* reads chars from the file until we hit EOF */
$ V3 U& O! J! _$ A) T1 Z! E4 rdo
5 G  n& f: h! ?{
9 n' J) |1 t3 H5 H, Qread(handle, &amp;ch, 1); ; k/ G( N/ s: b# B6 M. h2 ^
printf("%c", ch);
* [: @, Y7 l& C5 s8 t! r: ?, f} while (!eof(handle)); </FONT></P>; u- P) k2 ^' a8 B- D( x
<P><FONT color=#0000ff>close(handle); ' q4 ]$ k) X' G( a
return 0; & `' ]5 G, O1 B' r$ P7 Z5 Y
}
+ {9 a6 o, o. t2 a5 \4 s; t. t</FONT></P>' z0 P! o" C3 Q0 m
<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-26 06:15 , Processed in 0.563991 second(s), 52 queries .

回顶部