QQ登录

只需要一步,快速开始

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

函数大全(l开头)

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

823

主题

3

听众

4048

积分

我的地盘我做主

该用户从未签到

发帖功臣 元老勋章

跳转到指定楼层
1#
发表于 2004-10-4 02:58 |只看该作者 |正序浏览
|招呼Ta 关注Ta
<><FONT color=#ff0000>函数名: labs </FONT>
9 H! _/ X# X. [1 C/ T用 法: long labs(long n); ' W# t) L: ?+ t% {6 Z6 ]4 k8 Q
程序例: </P>1 v7 S( `9 M' s
<><FONT color=#0000ff>#include <STDIO.H>& a* H7 z" t8 S6 M2 b4 o& q+ K
#include <MATH.H></FONT></P>
4 \; a' H7 b6 f) O<><FONT color=#0000ff>int main(void)
; A' Y) ]9 a2 ^( I# @- n! K{
: A7 D( a+ y: Y( c! Blong result;
% L: _- {6 F# ?" A* @  Qlong x = -12345678L; </FONT></P>% Q$ c) _( y7 k+ b
<><FONT color=#0000ff>result= labs(x);
" x: ~8 d' d$ B: V+ L* {; S$ Wprintf("number: %ld abs value: %ld\n", ) _+ M1 P1 S7 h: {, e* Q
x, result); </FONT></P>% r5 ?7 Z8 B' h% Y. I, Y$ k
<><FONT color=#0000ff>return 0; $ M& {& R# L, o- ^& _5 {9 f
}
# ~* {9 i' `3 C/ K</FONT>
. f7 t. g% Q( P
, \; g) Y* y: W5 @' ^0 D) d</P>
) G5 u: @$ ?! W  u2 n1 s; @1 \<><FONT color=#ff0000>函数名: ldexp </FONT>' J0 v$ W) v; B9 o; ?3 `0 M/ Z
功 能: 计算value*2的幂
7 h  O2 ~! p" t; l7 a7 e用 法: double ldexp(double value, int exp);
- r5 S7 P! c& r6 c程序例: </P>
; T  C2 L$ z( i  `5 a3 L<><FONT color=#0000ff>#include <STDIO.H>
2 ?  j/ d: g  {' l/ m$ c9 s#include <MATH.H></FONT></P>
% c2 Z  p: }1 ]( w) S/ z) r& i5 W<><FONT color=#0000ff>int main(void)
9 P4 ], l- d# g: i{
# j& Z! y8 U  p: odouble value;
) D8 @( h! M5 z% e  ~# E6 Pdouble x = 2; </FONT></P>
- t0 @( U. X5 W5 {! N8 {<><FONT color=#0000ff>/* ldexp raises 2 by a power of 3
# n. u" H6 `1 D! v) r' b% t2 Pthen multiplies the result by 2 */ 7 U1 @; k) m, I3 \5 [
value = ldexp(x,3);
5 C( U& t7 w- r1 l" h6 Jprintf("The ldexp value is: %lf\n", 3 L3 d, u' l' I
value); </FONT></P>' z, f0 m7 s: a1 C9 E% V
<><FONT color=#0000ff>return 0; 9 L2 R& i" n( d8 \8 C2 m5 y7 d
} % m; n+ ]+ V/ q1 h/ b

) S: k1 e% w4 z  Q2 j</FONT></P>' q; \+ R8 a: n8 n! _! ^
<><FONT color=#ff0000>函数名: ldiv </FONT>
, ]) G# r) X* s7 u功 能: 两个长整型数相除, 返回商和余数 % `4 @0 U3 \# ]8 `: W
用 法: ldiv_t ldiv(long lnumer, long ldenom);
% ^6 G: I/ u% e4 j程序例: </P>
% [+ f+ \# U8 `$ R1 L<><FONT color=#0000ff>/* ldiv example */ </FONT></P>0 i2 m6 e7 S0 K/ z
<><FONT color=#0000ff>#include <STDLIB.H>6 ^% E" M1 o( i# y
#include <STDIO.H></FONT></P>$ e, J7 O1 Y* t0 v% {
<><FONT color=#0000ff>int main(void)
, F9 \  d7 G* _8 G; y{
- }" ]0 x) ?6 uldiv_t lx; </FONT></P>: ~( [0 D/ e. Q  q# {9 ?
<><FONT color=#0000ff>lx = ldiv(100000L, 30000L); & O5 T  L/ j1 q+ l4 U9 U: s
printf("100000 div 30000 = %ld remainder %ld\n", lx.quot, lx.rem);
: q3 K/ |5 ~8 D' A7 D5 Kreturn 0; </FONT>& b7 C( s/ G* _2 ~1 Q7 z
<FONT color=#0000ff>} </FONT>7 n& G- z2 L3 E& S* f
</P>: J% c) O2 F, w0 i# K' S% I
<><FONT color=#ff0000>函数名: lfind </FONT>4 `+ n  p+ J' |& \; S5 J! m' W) b
功 能: 执行线性搜索 % {3 N- h3 i1 P% i" b! B
用 法: void *lfind(void *key, void *base, int *nelem, int width,
+ o$ p  z" f8 @* R& L; `  Qint (*fcmp)());   M5 y2 X; Z3 }) L
程序例: </P>5 w( c: K& r) G7 l: g3 ~4 b5 ?
<><FONT color=#0000ff>#include <STDIO.H>4 O* z6 f* l9 X4 z) i
#include <STDLIB.H></FONT></P>
3 I: t7 J8 B) n<><FONT color=#0000ff>int compare(int *x, int *y) & Q; T7 S5 R" q
{
0 L/ s" `/ I& p) v4 x6 greturn( *x - *y ); * h7 B- p2 \. h- k( g. D
} </FONT></P>6 ?1 p, u! s6 _' s
<><FONT color=#0000ff>int main(void)
5 k9 \  J; w! S4 u" N& w. ]: q{
8 G" \! P- _* J- ^4 @# N, {int array[5] = {35, 87, 46, 99, 12};
' q& ^9 m2 g( v2 @  }size_t nelem = 5; 4 y  q$ v) n' `
int key; " I% G; F; s: r( z0 |7 P' D7 Y# ^
int *result; </FONT></P>
4 I; O' [/ s7 M<><FONT color=#0000ff>key = 99;
0 N) C+ O/ E$ Y$ i" v! Xresult = lfind(&amp;key, array, &amp;nelem,
0 C$ j: H. F' y, N: v6 Isizeof(int), (int(*)(const void *,const void *))compare);
  }( N# p* }! y6 h, z& j; u/ Q4 |if (result) % f- Q3 \0 h2 ]/ c8 P* K/ A
printf("Number %d found\n",key);
" Y* q) B$ _! E; u; i; Delse # k2 ^% g8 A; Q
printf("Number %d not found\n",key); </FONT></P>
9 V7 e* Z, W3 N' s6 w( }# U# }$ X0 H, r; A<><FONT color=#0000ff>return 0; / R$ ~% U; n. o
} </FONT>& C9 _. [! y- V- F5 {/ d8 r4 [+ B
. Z  N% N3 y$ x( z  Q7 t8 W) Z$ _
</P>
! q% k( {4 n& p5 c( W8 o<><FONT color=#ff0000>函数名: line </FONT>4 d" S2 ?" K; J1 b8 G1 ?
功 能: 在指定两点间画一直线
7 `: y: _" y; X, a, i5 F4 \用 法: void far line(int x0, int y0, int x1, int y1);
) b' S7 b# F% Y' L. ^& G+ O1 ?: H程序例: </P>
7 \" W- ?6 r' {3 P) |% y0 Z; b8 Z4 w# W<><FONT color=#0000ff>#include <GRAPHICS.H>5 c& \1 |* f: y# P& h
#include <STDLIB.H>6 F9 b" a# q0 Z; |
#include <STDIO.H># B( m- h' t  [7 J9 t7 J
#include <CONIO.H></FONT></P>, Z  R: v" d: g9 X8 J
<><FONT color=#0000ff>int main(void)
' M0 E6 \, Y8 _( ?% g; E& c{ - h+ C& C' c# d% J/ M5 z1 S6 J
/* request auto detection */
( \, o/ C9 v& H% ~9 p" w7 xint gdriver = DETECT, gmode, errorcode; / b, M% a  P9 s. h+ T9 D6 u# z! [
int xmax, ymax; </FONT></P>
3 E* i  E9 i. ?% U: r<><FONT color=#0000ff>/* initialize graphics and local variables */
& K5 [8 E% C3 Tinitgraph(&amp;gdriver, &amp;gmode, ""); </FONT></P>! Q1 \4 n3 O  J* h: ~7 L! R' a
<><FONT color=#0000ff>/* read result of initialization */
. g" _: I, m2 m% ~errorcode = graphresult(); ; A' `- k$ i$ H4 O3 Q
/* an error occurred */
. w- g( Z) p9 v8 R3 n! R7 A  Xif (errorcode != grOk) : Q* O# V/ V5 D% r, Q
{
# @, c# i9 D# f% o; ]6 sprintf("Graphics error: %s\n", + x1 w$ A) _. [4 i, {9 }# w0 q
grapherrormsg(errorcode)); & P" i6 O3 O7 p* ~" n
printf("ress any key to halt:");
! T& N: ]* F0 }getch();
3 @4 P, I) r  w) t0 j$ o9 Zexit(1);
$ O$ H5 t. W% @6 A) [2 W' n} </FONT></P>
7 O, w1 l7 g; S- M8 }" g<><FONT color=#0000ff>setcolor(getmaxcolor()); " V% ]0 L0 A0 K. @
xmax = getmaxx();
) }# q+ @) }2 }% |ymax = getmaxy(); </FONT></P>
2 E( k5 o7 ^& `2 w<><FONT color=#0000ff>/* draw a diagonal line */
6 d$ Y9 p+ r9 T1 m5 G# e/ vline(0, 0, xmax, ymax); </FONT></P>
" s0 |& M0 i- U/ A3 k9 P3 x<><FONT color=#0000ff>/* clean up */ 7 V+ n3 l& v7 A& t4 }9 X) Z
getch();
( t' Y: K5 E% \4 sclosegraph();
) O+ L6 i0 Z  p( U5 treturn 0;
  p& ]/ y  K- v) W}
7 q/ [- ]" h  j' d</FONT>
, {% ~; k7 M/ P</P>) x8 W9 c3 ?  u: W' ^
<P><FONT color=#ff0000>函数名: linerel </FONT>
( e) c# U. t" q, W  r+ g6 ^功 能: 从当前位置点(CP)到与CP有一给定相对距离的点画一直线
4 e+ f# D% Q7 C' z$ L用 法: void far linerel(int dx, int dy);
8 ~$ R. k. r9 b4 a  C程序例: </P>
% R9 ?* Q. C& x  u+ F1 V2 H& t7 O<P><FONT color=#0000ff>#include <GRAPHICS.H>
8 x( s6 r! I# N: m( L8 X7 r% i( k, z#include <STDLIB.H>
8 I8 x" J  `7 S& T4 H6 Q" d' J#include <STDIO.H>
0 U4 m3 e2 E; E' ~; V0 K/ ^8 q/ y: S#include <CONIO.H></FONT></P>
5 P1 N! X" P7 M  }% w. c<P><FONT color=#0000ff>int main(void) 4 w8 d! r2 Q3 o: Y- Y& U
{
) Y( `/ V% U0 _5 b/* request auto detection */ ' j8 k4 q7 T2 W  a  c, j; \$ X1 P
int gdriver = DETECT, gmode, errorcode;   m/ z0 {3 d  c
char msg[80]; </FONT></P>+ ^% c3 L/ G3 y7 `+ D" k6 |: b8 S
<P><FONT color=#0000ff>/* initialize graphics and local variables */ 4 E: F! `& H$ O% `
initgraph(&amp;gdriver, &amp;gmode, ""); </FONT></P>
3 Y* j  ~5 }- W! k+ _+ Z# D<P><FONT color=#0000ff>/* read result of initialization */
, j7 `5 b9 t+ u2 {8 S( K: \$ Qerrorcode = graphresult();   Q5 \/ v9 `: J4 H: B
if (errorcode != grOk) ) t# }9 r5 J, F; V
{
. v* w2 n( u% c, |) ]printf("Graphics error: %s\n", 4 X; e. a; T3 Z
grapherrormsg(errorcode)); 8 g- v( [! E; v
printf("Press any key to halt:"); # Q! T5 y$ j( m* ^/ W' T
getch();
7 L& c2 K5 C# d9 {/ Z7 M4 }* Texit(1);
7 d8 y, O: R; v! }, p) Q/ s9 N} </FONT></P>
  }' M& ~: h2 x4 Q, s4 P<P><FONT color=#0000ff>/* move the C.P. to location (20, 30) */
7 {- G3 J( D. c3 Q/ x; y0 Mmoveto(20, 30); </FONT></P>
2 ?# }9 i) P% a" z" g  K2 q+ L, p<P><FONT color=#0000ff>/* create and output a 8 T1 `; l2 V" l
message at (20, 30) */
7 g+ K2 T4 E& {6 _' F1 wsprintf(msg, " (%d, %d)", getx(), gety());
" x* v1 {6 ^! X' v6 ?outtextxy(20, 30, msg); </FONT></P>
/ A: T* L' v: G3 I4 l+ l<P><FONT color=#0000ff>/* draw a line to a point a relative / F; z7 `4 P; P
distance away from the current
& H' I$ B0 V: jvalue of C.P. */
$ X. u1 S9 V* B8 K( B  f' f/ Jlinerel(100, 100); </FONT></P>9 y  e" `; M6 `  ]6 E) L3 ?
<P><FONT color=#0000ff>/* create and output a message at C.P. */
" K! B8 H6 b0 }$ H9 ]) A4 Bsprintf(msg, " (%d, %d)", getx(), gety()); * Z/ ?0 H0 S( i
outtext(msg); </FONT></P>8 i2 Y# o( ?2 S5 B( m# [9 y
<P><FONT color=#0000ff>/* clean up */ * Z; w( C8 s7 g0 O
getch();
6 J% [; ^, T, G) u( d" `/ O7 ?+ Qclosegraph(); % J3 [3 H" j7 z' s! _6 }
return 0; , y% a4 P7 L$ b* Z
} </FONT>3 E6 f. o# t4 c) X& p3 U  q
</P>4 m, ?8 A/ @$ p5 ]( \
<P><FONT color=#ff0000>函数名: localtime</FONT>
. P) F. l) Y+ ^( |6 }7 o功 能: 把日期和时间转变为结构 $ ~( L' i: w2 q, e4 y
用 法: struct tm *localtime(long *clock);
. \/ G$ y' I2 [" z' E6 n程序例: </P>
6 F: k7 c, I7 F+ y2 n( E) n<P><FONT color=#0000ff>#include <TIME.H>, Q$ M  X  ]7 O9 Y! Z2 Z
#include <STDIO.H>( }. c; @+ U& b8 \( D
#include <DOS.H></FONT></P>
) l2 W( @0 b" R<P><FONT color=#0000ff>int main(void)
1 C: e8 G6 ]2 x7 z: g% U{
8 |* s2 g% W0 k$ o8 Q1 Btime_t timer;
! h0 X) e1 u# X( [/ C7 Gstruct tm *tblock; </FONT></P>
+ O6 Y5 l+ o# l; G) N/ T<P><FONT color=#0000ff>/* gets time of day */
2 }: d+ N1 ]5 L8 a, P1 D  ltimer = time(NULL); </FONT></P>
+ p$ V: W& v" I; ]4 U- p  O& R<P><FONT color=#0000ff>/* converts date/time to a structure */
5 n: E+ h0 k, j* N" U6 D; `9 ftblock = localtime(&amp;timer); </FONT></P>
" ~2 ~2 P; F& v; a; x7 p<P><FONT color=#0000ff>printf("Local time is: %s", asctime(tblock)); </FONT></P>3 [+ A3 Z! J$ {2 _3 |
<P><FONT color=#0000ff>return 0; 5 E( C, d- H2 h0 I& G& g5 m5 c
}
  j" f( e* T$ ~9 _- L# E/ Y) c9 U6 {$ m. ?% o

- j3 b8 N& k7 J9 [</FONT></P>' W/ d* W& o# {: J' A
<P><FONT color=#ff0000>函数名: lock </FONT>
. R4 V& l* ^( s3 U0 V' A功 能: 设置文件共享锁
4 [# B/ i5 H1 i0 k用 法: int lock(int handle, long offset, long length); ) U: J, p9 i5 H6 H5 i
程序例: </P>5 o( \' X: o8 N' N0 L7 x% x
<P><FONT color=#0000ff>#include <IO.H>
2 _3 d0 A3 c% o1 F* ]& s#include <FCNTL.H>9 s. O! j) y1 T+ z8 \
#include <SYS\STAT.H>6 i: g& X0 u+ @
#include <PROCESS.H>
5 B4 E! M$ k% F9 Y/ Z4 j4 v4 o#include <SHARE.H>* v5 u# R! V- R/ u% d; t
#include <STDIO.H></FONT></P>
. Z' _( P2 w4 A+ @<P><FONT color=#0000ff>int main(void)
0 y1 Y5 s; h( ^* |{
: r6 S, P7 O/ V& kint handle, status;
3 x, {, [/ {4 k! X# a) glong length; </FONT></P>
1 v; G$ I1 G6 U8 @0 z' t<P><FONT color=#0000ff>/* Must have DOS Share.exe loaded for */
) @/ U! Z8 a" c8 x/* file locking to function properly */ </FONT></P>2 z* X5 _; v( B  R# n0 r, j
<P><FONT color=#0000ff>handle = sopen("c:\\autoexec.bat",
( q- c& N' I- MO_RDONLY,SH_DENYNO,S_IREAD); </FONT></P>
  X& {+ P  J# N<P><FONT color=#0000ff>if (handle &lt; 0) ! D4 w- `0 f6 O0 W
{ ; i/ e+ k$ d, I- j: n. h
printf("sopen failed\n");
0 ~$ v' `( \' Nexit(1); 5 f9 \9 `2 O+ v% o0 H2 W: a# |/ T
} </FONT></P>
  T) a9 b* Z0 X. p  Q+ q0 w& O<P><FONT color=#0000ff>length = filelength(handle); " p3 u2 m6 y/ p" C9 J, w
status = lock(handle,0L,length/2); </FONT></P>8 n5 Y, X- r2 `$ @/ ?+ r
<P><FONT color=#0000ff>if (status == 0)
$ e+ B4 {- S2 D/ Gprintf("lock succeeded\n"); ! x) ?& f- `' }
else
2 U0 b1 \2 F/ H* n8 q: u% pprintf("lock failed\n"); </FONT></P>! J* j7 N; @9 y
<P><FONT color=#0000ff>status = unlock(handle,0L,length/2); </FONT></P>$ g* Y+ N4 V/ V2 A
<P><FONT color=#0000ff>if (status == 0) 0 ?+ o9 c; m) m& O: t7 I
printf("unlock succeeded\n"); : d0 n4 Q% L3 D5 \- n) P6 m/ \4 r& t
else 3 R* T+ e: q) M4 l
printf("unlock failed\n"); </FONT></P>
- e0 V2 P' P& Y1 `; U) @<P><FONT color=#0000ff>close(handle);
, K: ]3 l- U$ C2 D) K3 P! Yreturn 0; # E% I, p- Q1 w+ }% n% z
}
) W+ w. T4 D( s# I0 H$ D</FONT>; E% I! o" @8 E& @8 B
</P>
4 }/ _! [* e9 g+ K8 M% t, f- T" @$ d<P><FONT color=#ff0000>函数名: log </FONT>8 i2 T, K  m% t1 M) r# Z( B
功 能: 对数函数ln(x)
% h4 o6 i# v8 [' [% m用 法: double log(double x);
* D" [1 V- }. M) `! _$ y程序例: </P>
2 q% P5 j) c/ S6 b: W& w% q<P><FONT color=#0000ff>#include <MATH.H>
! q' A* B7 Q7 d' P& p) {6 S#include <STDIO.H></FONT></P>/ X( c4 W  n- [0 \! _
<P><FONT color=#0000ff>int main(void) 7 h4 k- H6 {$ @, L! O6 w
{ ' @  M. W2 m5 x0 G/ W+ J
double result;
/ K4 z& W# V( Odouble x = 8.6872; </FONT></P>8 a8 b, k7 k# n
<P><FONT color=#0000ff>result = log(x); ( e8 A0 m5 }+ y
printf("The natural log of %lf is %lf\n", x, result); </FONT></P>
  D/ y/ z+ \" d& q: T7 Z. G<P><FONT color=#0000ff>return 0; * {( M6 e# k. r4 n. }  \
}
. o1 v+ \0 h( ?1 e0 l5 K% A3 c8 L* ?! z* `( ]% U2 K
</FONT></P>
5 i5 Y+ c$ F1 D$ @0 c0 \9 [<P><FONT color=#ff0000>函数名: log10 </FONT>
% i& v0 {$ D, _7 m5 k! F功 能: 对数函数log
, h* {7 i+ D# }0 V用 法: double log10(double x);
# C& R; M9 m* t程序例: </P>
2 [# C* n5 Z4 K. q( q<P><FONT color=#0000ff>#include <MATH.H>& \2 e8 N' W7 X
#include <STDIO.H></FONT></P>% s2 ~$ s- F& ]% }' ]3 F
<P><FONT color=#0000ff>int main(void)
! l# o; X( _0 d" c1 D- \% {{   m% j6 n: ~5 O2 N+ M3 P
double result;
+ C6 l; H  Q4 I0 u+ q3 b7 rdouble x = 800.6872; </FONT></P>3 ^& w$ \% a: t% s' B- M& w1 a
<P><FONT color=#0000ff>result = log10(x);
; ?; q# E, l4 [printf("The common log of %lf is %lf\n", x, result); </FONT></P>- n# o0 ^5 W' b2 i$ \7 j
<P><FONT color=#0000ff>return 0;
+ q- i# S$ w" j5 H* q) T2 ?} ) \: `; P- p7 x$ {% ~

3 E2 {' ^: |1 g' v% T* D7 m</FONT>6 m6 c0 @3 ]; E
</P>" V& W' t2 d0 M3 s! k  L7 \6 e
<P><FONT color=#ff0000>函数名: longjump </FONT>$ a! p6 }9 J% |; g
功 能: 执行非局部转移
% H; f) ^' t. w用 法: void longjump(jmp_buf env, int val);
' F$ l1 c9 C# y) y程序例: </P>' o: W6 B' }) h7 ~+ W
<P><FONT color=#0000ff>#include <STDIO.H>" i! k; [4 @7 F( T( Y
#include <SETJMP.H>  t0 n! T6 N8 p7 x
#include <STDLIB.H></FONT></P>1 ^: i! J$ J0 Q* Y4 B( y
<P><FONT color=#0000ff>void subroutine(jmp_buf); </FONT></P>
9 U6 D7 j; f5 p8 Y<P><FONT color=#0000ff>int main(void) ! e1 j' e) L* p) f4 T- S# b
{ </FONT></P># [( u9 d/ T4 H2 A& L
<P><FONT color=#0000ff>int value;
& I* I5 j& V" r0 j7 pjmp_buf jumper; </FONT></P>
7 @) W; E! s! p8 S6 F) N' ?$ y<P><FONT color=#0000ff>value = setjmp(jumper);
" }4 K4 A4 a  P* @if (value != 0)
; O+ }8 ~5 c# h; s+ Q{
% Z0 e2 O3 g* r7 ^0 z5 N  uprintf("Longjmp with value %d\n", value);
$ C$ G$ W7 v; U' l- y  Q! ?exit(value); 0 _5 k5 [7 f/ F2 z4 R  U
}
/ Y+ H# n! @' Y- W6 v' Cprintf("About to call subroutine ... \n"); / N! ?+ s7 L; V$ k: _) x! @7 g& w
subroutine(jumper); </FONT></P>
1 v5 }" V% c1 p8 _& i! ]; m  I<P><FONT color=#0000ff>return 0; 4 I/ h2 V6 t9 |6 G; H4 \
} </FONT></P>
, N  p6 f: Q1 z! B( j0 e+ T  t<P><FONT color=#0000ff>void subroutine(jmp_buf jumper)
% p, Y8 n+ G4 M% K, q) J. d{
9 b: Z. n  S! O( B) h' z# u/ M- L2 Alongjmp(jumper,1); + {  s1 z; @/ Q5 H2 D- \' x
}
, [  M- L0 V4 _% T* ?! `
  k5 Y9 c8 v4 Y" N8 D4 W' _9 |</FONT>$ m  w" A: j  J7 C& k$ Y, `
</P>
# q8 F5 |- {$ s: T( i8 C7 A<P><FONT color=#ff0000>函数名: lowvideo</FONT> # s3 _3 [. k9 W) s$ d
功 能: 选择低亮度字符
: U! `2 X5 N( T2 H" `用 法: void lowvideo(void);
, J8 ^0 U3 e( f5 D& n* _程序例: </P>
, h( z1 e2 ~2 u: ^% d. j" `<P><FONT color=#0000ff>#include <CONIO.H></FONT></P>0 p4 V. ~2 N7 q  ~4 |. i: v$ S
<P><FONT color=#0000ff>int main(void) * h  p3 a5 t$ E: d' H8 R, Z% E
{ # o+ M* h0 M. i+ c' z9 A0 P: @
clrscr(); </FONT></P>
. e' v/ W3 i# D) G<P><FONT color=#0000ff>highvideo();
2 v6 l) e8 M7 I$ P6 r* e/ m  hcprintf("High Intesity Text\r\n"); 3 y; o% K7 U, J1 G+ A
lowvideo(); 8 ?$ ]( W5 [* N$ Q3 {* A
gotoxy(1,2);
5 r* ?5 S, H+ e* hcprintf("Low Intensity Text\r\n"); </FONT></P>4 D3 I4 U2 ~& G& d( c
<P><FONT color=#0000ff>return 0; ) V1 }9 a9 p4 |3 b
}
& s) l! [  i6 M& v+ @: k9 }* r: X& I) S& N
</FONT>3 b5 r! M9 W& C5 i: |! j
</P>
9 e- Q: Y& p2 K3 L! k. _( Y<P><FONT color=#ff0000>函数名: lrotl, _lrotl </FONT>
7 [" I$ R* _: G& e/ }6 \- O功 能: 将无符号长整型数向左循环移位
& P4 W- q. d' q用 法: unsigned long lrotl(unsigned long lvalue, int count);
0 q3 `0 M: r% G4 _unsigned long _lrotl(unsigned long lvalue, int count); 1 O" z, U( B0 ]0 A
程序例: </P>
0 e9 c$ O4 x  U" O<P><FONT color=#0000ff>/* lrotl example */ * L, q2 F8 N7 Y) I& s1 @
#include <STDLIB.H>/ ?4 T* Q' O, T3 e
#include <STDIO.H></FONT></P>2 [3 d! @' s2 G
<P><FONT color=#0000ff>int main(void) . \: ]8 D# |0 l! t
{
4 ^* [; D, W2 f2 M6 r3 k& N  wunsigned long result;
* f1 N9 V* Z' S7 R. F( _unsigned long value = 100; </FONT></P>6 H& k6 b$ O+ e$ A  g4 V
<P><FONT color=#0000ff>result = _lrotl(value,1);
( t& B' V. u2 W. F% j$ a6 nprintf("The value %lu rotated left one bit is: %lu\n", value, result); </FONT></P>
' R( G) [4 k. b- y% V<P><FONT color=#0000ff>return 0; 3 P$ b- N+ \/ B, ^. z- z" u9 Q
} + X0 m* z& G8 ?
</FONT>& F8 f) y- i7 L% N/ J( G
</P>
  }6 f9 @9 T" T<P><FONT color=#ff0000>函数名: lsearch </FONT>$ @( s" D" K' ]5 O
功 能: 线性搜索
; Z0 `7 A" [5 {- O用 法: void *lsearch(const void *key, void *base, size_t *nelem,
: i7 _" f6 N7 r' h2 |size_t width, int (*fcmp)(const void *, const void *)); % f. b; G2 B7 Z7 X  D# [
程序例: </P># p: W1 T# u+ q. v5 ~9 D' V- |' R
<P><FONT color=#0000ff>#include <STDIO.H>
  E( |4 R5 H' X) y, L3 F#include <STDLIB.H></FONT></P>
6 v, w/ `4 t4 _& [<P><FONT color=#0000ff>int compare(int *x, int *y) : y& s  k$ g) e0 s7 q
{
4 `. s" C3 w. m% L5 U7 b) w3 ereturn( *x - *y );
: q; l& D/ i' M4 }4 i! A+ I} </FONT></P>* B8 k* k+ ~# j6 f+ W
<P><FONT color=#0000ff>int main(void) 1 x/ J# f& w& g+ S6 [
{ ( Q  [! [0 K* @% g3 s
int array[5] = {35, 87, 46, 99, 12};
' f: `! D" t* k2 u' {9 j& s$ `size_t nelem = 5;
" F9 K: m  |; d/ ]int key; 6 V- {( O: s  \, k3 G$ c, g
int *result; </FONT></P>
% i9 o0 j* v# K* ]4 M9 a<P><FONT color=#0000ff>key = 99; ! [( X% r; ^6 ?, \# J
result = lfind(&amp;key, array, &amp;nelem, 8 U9 A" B* J5 a- D$ Q
sizeof(int), (int(*)(const void *,const void *))compare);
  `" q5 A" b$ s5 r. bif (result) & q+ j/ S# M4 r  b8 j. B
printf("Number %d found\n",key); 6 l6 K& a) y" R7 @+ Y+ t, P, h- z! }  ^, M
else
  M9 j. f: P9 L1 X) k2 ]9 ?* oprintf("Number %d not found\n",key); </FONT></P>
  R$ n. B* g$ J<P><FONT color=#0000ff>return 0; * }$ H/ Q, \* I3 Q* R( w
}
0 Y3 R" u& L& x5 B; J0 x; x- k0 }! _+ |# w8 ]/ c/ z( o
</FONT>6 I: m! j; V6 k2 D# `) `7 g
</P>/ w- O" b( U& F6 Y: x2 }4 ]7 n
<P><FONT color=#ff0000>函数名: lseek </FONT>) I6 \( P7 z4 r
功 能: 移动文件读/写指针
& x* S/ P7 {9 u- I' B用 法: long lseek(int handle, long offset, int fromwhere);
$ L5 T7 w# k7 X( o2 ^程序例: </P>
6 b" o5 D5 @+ I<P><FONT color=#0000ff>#include <SYS\STAT.H>0 D! z+ p% g% {  o- N
#include <STRING.H>' T. u- ]8 d; e8 V; l' u
#include <STDIO.H>
' |+ h. R7 k9 N, T( Q#include <FCNTL.H>- n$ j3 d1 k4 ^5 F
#include <IO.H></FONT></P>% l% d3 V% f, b  b& ~: R5 J
<P><FONT color=#0000ff>int main(void)
) R3 A& j( G. d5 |$ Y3 X{
  T8 t) d# I7 S, R0 @4 S' ^3 N% mint handle;
  q( z& m6 g4 d7 I, G! u! J4 lchar msg[] = "This is a test";
! e: d4 w+ b- Kchar ch; </FONT></P>& v! N3 W7 d6 U
<P><FONT color=#0000ff>/* create a file */ $ Z( J" o: b1 G3 g- I
handle = open("TEST.$$$", O_CREAT | O_RDWR, S_IREAD | S_IWRITE); </FONT></P>
3 q6 ~- C( Q; @; x' t, @4 t<P><FONT color=#0000ff>/* write some data to the file */
) u; Y9 R+ P, K/ N$ b, L3 N0 n! kwrite(handle, msg, strlen(msg)); </FONT></P>
6 v9 Z6 N( S# n( h& q& N6 {1 d8 ^8 I<P><FONT color=#0000ff>/* seek to the begining of the file */ ! V) m2 P0 c( U# b0 o! M9 q1 E$ V% x- |
lseek(handle, 0L, SEEK_SET); </FONT></P>( c3 P* X1 R5 X0 e
<P><FONT color=#0000ff>/* reads chars from the file until we hit EOF */
: g7 w% H' Z2 g! |4 _! y0 b8 Qdo % u; b! @1 M; b! _; i. }0 T
{
( t/ X5 h! }2 l% C6 Qread(handle, &amp;ch, 1);
1 b! W3 J+ ^  [& d' x4 Q4 cprintf("%c", ch); 1 l1 C* [7 a* |/ r
} while (!eof(handle)); </FONT></P>& b" z. B+ P/ O' J/ `
<P><FONT color=#0000ff>close(handle);
! _/ o  @( ?% o) T& U0 X% {return 0; % X7 [7 J% @& j6 B7 r( Q, G% \+ B
}
" X; ~. L# g# s8 m- ?9 w( x</FONT></P>
/ h! _" T1 s5 S( ?, t% F/ X<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-22 13:58 , Processed in 0.448193 second(s), 52 queries .

回顶部