QQ登录

只需要一步,快速开始

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

函数大全(l开头)

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

823

主题

3

听众

4048

积分

我的地盘我做主

该用户从未签到

发帖功臣 元老勋章

跳转到指定楼层
1#
发表于 2004-10-4 02:58 |只看该作者 |倒序浏览
|招呼Ta 关注Ta
<><FONT color=#ff0000>函数名: labs </FONT>& l( e, P& P( D: R, l3 v
用 法: long labs(long n);
3 G1 i. a. y. {: X# u" ]+ D) F6 |程序例: </P>6 W/ P6 m5 u& \* j" N+ f4 ~3 T
<><FONT color=#0000ff>#include <STDIO.H>
( o  y5 h' G# P/ \- L#include <MATH.H></FONT></P>0 d* K$ V( p5 u2 ]3 P6 f
<><FONT color=#0000ff>int main(void)
1 U& F) B* |' ~5 k$ O1 [, y{
6 s4 p" g6 Q& v; R" b" S0 M2 flong result; , @" K! c( P- o7 L) y
long x = -12345678L; </FONT></P>
! P! r! M3 X+ o; r5 q9 [<><FONT color=#0000ff>result= labs(x);
& u  u9 S, G: B% ^/ L) qprintf("number: %ld abs value: %ld\n",
9 H9 F1 x, s: X, r: X$ k* kx, result); </FONT></P>/ O5 F+ L5 C' [' [! B0 ^1 o1 F( U! U, F* h
<><FONT color=#0000ff>return 0; 3 F3 x: y+ @- @  v8 ^, d4 x
} - F( Q+ A, D+ M4 p, `" c
</FONT>
" {2 L8 F; `2 B, B' {' v  H( E
7 c  q; k& m/ g" w. W</P>
7 ?+ U! N3 x! h5 N6 y+ Y5 I7 H<><FONT color=#ff0000>函数名: ldexp </FONT>+ P! `7 `% A& f
功 能: 计算value*2的幂 & E2 V/ f/ i6 P1 H. E7 T. {
用 法: double ldexp(double value, int exp); : \- g. Y" }9 l9 B: u
程序例: </P>
# S6 s$ p" E; b! {+ @# A+ x  g<><FONT color=#0000ff>#include <STDIO.H>
2 U$ D2 k/ d) d, q7 D#include <MATH.H></FONT></P>
9 E  m# @( a# d7 N2 x9 U8 H<><FONT color=#0000ff>int main(void)
- }2 T* E3 c% p7 `{ 0 }2 I5 h5 G  o* O
double value; 4 @/ b6 X) v  S
double x = 2; </FONT></P>* b* {. [+ @9 d" Z' j& {7 z
<><FONT color=#0000ff>/* ldexp raises 2 by a power of 3 . Y0 W5 r4 n0 W  Z
then multiplies the result by 2 */
5 Y; n8 b* G3 D: u. y5 w$ Lvalue = ldexp(x,3); % U! J( q0 D" |
printf("The ldexp value is: %lf\n", , d+ C+ l% T( a6 i3 M) a
value); </FONT></P>  R" _3 D' {- F. d7 R* |, S
<><FONT color=#0000ff>return 0; 1 b8 O+ B3 V0 y# y, A) [
} % W% n: I+ g: o5 r8 i4 s% t
& Y! N8 I: ]8 r
</FONT></P>5 a# [( N& a6 s* H  S' v; k1 Y) Q
<><FONT color=#ff0000>函数名: ldiv </FONT>
2 \1 h/ W" Y5 B0 F; \$ G功 能: 两个长整型数相除, 返回商和余数
4 C. {! h4 C" ^8 Y$ C& k% s用 法: ldiv_t ldiv(long lnumer, long ldenom);
, n, g, n4 g. y3 O- g% u1 I程序例: </P>, G5 _7 G0 j) e( A! y0 o1 l" w9 i6 J
<><FONT color=#0000ff>/* ldiv example */ </FONT></P>; s0 s9 k9 B+ |& ]) }0 Q* j" S2 J! }
<><FONT color=#0000ff>#include <STDLIB.H>/ W6 u' I, x6 l( V9 D- @9 y8 B
#include <STDIO.H></FONT></P>
* Q+ b" k1 p. E  h- P0 I4 A$ A<><FONT color=#0000ff>int main(void)
7 M+ G7 A" q5 |: r) h* A( B{
9 [4 T8 q! W4 s% ]) \" [ldiv_t lx; </FONT></P>5 c" T& O! f1 t
<><FONT color=#0000ff>lx = ldiv(100000L, 30000L); . T/ F7 Q& ?( z; x( X
printf("100000 div 30000 = %ld remainder %ld\n", lx.quot, lx.rem); 6 b) I, ~2 s0 f% [: b1 g4 t
return 0; </FONT>7 B! k5 f0 {, z; Q8 Y' M: m
<FONT color=#0000ff>} </FONT>8 [5 W3 k, i* Q; |4 B
</P>6 q8 j# {5 w; q  p/ f0 B& ]
<><FONT color=#ff0000>函数名: lfind </FONT>- P! P, |6 W4 w7 h3 y
功 能: 执行线性搜索
2 C1 a9 B5 F* v用 法: void *lfind(void *key, void *base, int *nelem, int width, 5 B+ G8 W7 P! G3 F/ ?) X" |
int (*fcmp)()); " l- Q7 Y, L6 v8 P
程序例: </P>+ R( W- s( ^' u
<><FONT color=#0000ff>#include <STDIO.H>$ a! ^+ k) [$ d- }+ ?2 R( D
#include <STDLIB.H></FONT></P>( R0 k! k3 q, M! Y2 s. C% B
<><FONT color=#0000ff>int compare(int *x, int *y)
0 O6 u( \: h# n+ F- B5 c# B{ " `: d8 ~3 q6 T3 A, A6 P( G+ K
return( *x - *y ); ! T; E9 o: `7 d& s/ d
} </FONT></P>. {+ t0 ~* e; f7 W% |
<><FONT color=#0000ff>int main(void) # i! w, e0 X; i
{
* B+ x+ E5 ^# p( q8 rint array[5] = {35, 87, 46, 99, 12};
9 W  H2 A, H, z" |! _* Usize_t nelem = 5; 0 G/ @1 f. c# G" }( h
int key;   \1 K% ]) |/ f1 f( f
int *result; </FONT></P>
* E2 x3 A) r2 Q, K<><FONT color=#0000ff>key = 99;
) }/ _- W" G+ s$ Wresult = lfind(&amp;key, array, &amp;nelem, 8 k. l& H; u+ U0 |6 K9 }# g
sizeof(int), (int(*)(const void *,const void *))compare); 9 D- }) v5 M* n8 S: a
if (result)
& l; E& n' k! z( q# n( J( t% B( c* Zprintf("Number %d found\n",key); ( E! J* E+ s% F( A6 ~- C7 L
else / K9 C9 j9 m9 E, A5 ^
printf("Number %d not found\n",key); </FONT></P>$ H+ b9 I1 s5 k+ Q5 |. o
<><FONT color=#0000ff>return 0;
# B6 b3 V6 p- {6 o! h" s2 p} </FONT>
0 G! E# g. |( e0 [8 K6 c( z3 A7 L7 m3 Z+ t* e2 v9 `
</P>
" ^8 o& u5 d/ X. K. Y<><FONT color=#ff0000>函数名: line </FONT>
7 l% e0 {3 U) H! J. h3 ?" U功 能: 在指定两点间画一直线
$ f3 ~; g7 Z$ V% B% f用 法: void far line(int x0, int y0, int x1, int y1);
' g7 `4 J3 S  @4 I9 A! }5 ]8 r3 a3 o程序例: </P>
) B4 v, o! m( A. H<><FONT color=#0000ff>#include <GRAPHICS.H>* P0 c, Z  C  F
#include <STDLIB.H>
  k5 o$ f$ p- Q" Z#include <STDIO.H>; y7 I) h. R2 _! {
#include <CONIO.H></FONT></P>
/ |1 ]" y8 B' Q<><FONT color=#0000ff>int main(void) . K. A  |  X) d; {
{ 6 Z' _$ r- K" u8 K# t
/* request auto detection */ ' O9 {8 e0 w( _: [* U, Z( @1 J8 K
int gdriver = DETECT, gmode, errorcode;
; v6 O2 r' m+ N6 N; A# Y* Dint xmax, ymax; </FONT></P>. |6 t& r% ?: s7 ]. E" q: J
<><FONT color=#0000ff>/* initialize graphics and local variables */ # H- b, M) [8 V7 _; b
initgraph(&amp;gdriver, &amp;gmode, ""); </FONT></P>
; F" j- P$ ~* p<><FONT color=#0000ff>/* read result of initialization */
6 q$ E0 Y, G; S8 g1 e6 Xerrorcode = graphresult();
) v9 M. k! f2 [: q) [- w' y/* an error occurred */ 8 L9 s. C4 f# M" m. B
if (errorcode != grOk)
" \$ D5 B% d, d5 Z9 l- L: g* {{ & v. B+ i3 @5 Y; ?+ {* D
printf("Graphics error: %s\n",
- |" b8 o3 w3 y  fgrapherrormsg(errorcode));
6 g/ G* V& B. {( xprintf("ress any key to halt:");
5 |9 X' @& j$ z0 U3 x, ygetch();
( i3 Q8 ]) K$ {0 vexit(1);
  P* ~# I, C# X9 _! a" C3 ]} </FONT></P>, `# z( T- R0 u8 b0 Z6 ?) G
<><FONT color=#0000ff>setcolor(getmaxcolor()); ( a9 C6 _! T0 ^8 j
xmax = getmaxx(); $ F4 m$ w) |- }+ ^
ymax = getmaxy(); </FONT></P>& H3 u% S4 e0 [) n' y
<><FONT color=#0000ff>/* draw a diagonal line */
" }0 B5 H( W+ E: Xline(0, 0, xmax, ymax); </FONT></P>5 H* P' C" Y. q+ v6 r" z5 d; D
<><FONT color=#0000ff>/* clean up */
8 a- _! b7 L! P6 p, E- w5 Ogetch();
' ^& K3 Q. ?+ ^7 N, H4 ]closegraph(); 6 f4 I8 X8 q+ e
return 0;
! G/ b% h$ t9 x5 s} % N2 {, [( s9 R0 @' {
</FONT>, }- L0 R. o+ C
</P>
# p. t! W' M. [' k7 ~<P><FONT color=#ff0000>函数名: linerel </FONT>4 q5 ~/ D( W; r  n/ J7 N% h- q
功 能: 从当前位置点(CP)到与CP有一给定相对距离的点画一直线 4 ?9 Z" M: Y( ~+ e" R" T- o
用 法: void far linerel(int dx, int dy);   w7 ?% ?1 n! {5 `
程序例: </P>+ U# m6 O% }( t# `
<P><FONT color=#0000ff>#include <GRAPHICS.H>
  H7 l) _. ]# n2 j#include <STDLIB.H>
& ?) e! o% Q/ L5 }6 [5 i* p#include <STDIO.H>, S# c% n' `; p6 {3 P
#include <CONIO.H></FONT></P>
. N: T6 I# f* a0 X+ G! K2 }: [<P><FONT color=#0000ff>int main(void) 0 a$ g2 q# G3 b. [; V. x/ `% @2 z- e
{ ! L0 C0 `; `) Q
/* request auto detection */
! [6 w1 Q* i  ?int gdriver = DETECT, gmode, errorcode; 3 F# ?/ E8 \& N3 N  O8 q
char msg[80]; </FONT></P>
$ s" A  p& y8 y+ O% W+ f) c<P><FONT color=#0000ff>/* initialize graphics and local variables */
+ g9 A. e5 H" Q$ D- v6 [* l/ Tinitgraph(&amp;gdriver, &amp;gmode, ""); </FONT></P>
+ i# ?- @0 c$ g' V: P2 H8 k: M<P><FONT color=#0000ff>/* read result of initialization */ " M1 H1 K1 b0 Y/ ~# X4 j
errorcode = graphresult(); & j$ y0 Z4 e" ]
if (errorcode != grOk) 9 ~8 S* a: B& o
{
) a7 ]. K4 C& Lprintf("Graphics error: %s\n",
/ ^8 m# D* |7 n! Ographerrormsg(errorcode)); 6 X/ U9 e: l$ [4 s
printf("Press any key to halt:");
6 H5 ^% B6 B8 lgetch();
2 J7 p* @: S# H, w* ]: Bexit(1); 2 o' \/ J5 R1 l* g; H& d3 P+ ?
} </FONT></P>
8 `6 Q2 W3 I7 y3 S. i<P><FONT color=#0000ff>/* move the C.P. to location (20, 30) */ % a3 d/ _- Z' ?! C1 a) K9 u
moveto(20, 30); </FONT></P>3 v2 C& Q: k* ?- T: b& X
<P><FONT color=#0000ff>/* create and output a
1 d' x' F2 q/ |- `- H& qmessage at (20, 30) */ 7 ]$ Z" K8 U4 E. R. @
sprintf(msg, " (%d, %d)", getx(), gety()); + X  k) p4 C. p& N. d. c% P
outtextxy(20, 30, msg); </FONT></P>, u: s* X  P+ N( @3 U/ n7 @
<P><FONT color=#0000ff>/* draw a line to a point a relative - k' r8 H9 t9 r1 E
distance away from the current 2 s" Z& Y2 m4 ^4 F# ]& B
value of C.P. */ 1 T; P" Y0 e7 ~. e+ c0 i* _4 z
linerel(100, 100); </FONT></P>2 Q+ }" w5 F! }1 W8 q" b( j+ b
<P><FONT color=#0000ff>/* create and output a message at C.P. */
- o3 E7 r: R: a! |( w9 jsprintf(msg, " (%d, %d)", getx(), gety());
: C; `5 [6 h7 m4 X7 Y8 Louttext(msg); </FONT></P>6 p# Y+ |4 d' X7 N9 B
<P><FONT color=#0000ff>/* clean up */ 9 ]0 D' m4 T6 X- d; W6 `
getch(); ! M0 V, N( K# J# m* X. G+ V# x
closegraph(); ; e' l0 I* P5 i# r, q: X
return 0; ) |- q; t  O4 z2 E' v( s9 w
} </FONT>
+ ~% \9 S: y) H+ f! P. w. S3 S</P>" Y' j. f; N  z* K5 [5 P2 d
<P><FONT color=#ff0000>函数名: localtime</FONT> ' K9 A+ e; P+ \6 }4 @
功 能: 把日期和时间转变为结构 6 u/ ]. n5 ]: K( N: {
用 法: struct tm *localtime(long *clock);
8 U# g( H8 ~$ V8 f# t# n程序例: </P>
& H% e2 j) I' D<P><FONT color=#0000ff>#include <TIME.H>
6 g4 Y0 R& k# I# z! S#include <STDIO.H>. T6 n$ }4 z8 Y1 s) H1 _
#include <DOS.H></FONT></P>
+ U" U  K! d2 j) U7 `# g<P><FONT color=#0000ff>int main(void) : a5 o, V8 {$ O2 K2 A% N$ M5 i
{
% Y  Q! M$ G4 |; h: Q9 F* A9 rtime_t timer;
" V: f# @. w; g) b% }6 sstruct tm *tblock; </FONT></P>
& n' V2 Y- W, W+ {<P><FONT color=#0000ff>/* gets time of day */
( D/ a3 H: M# K2 `timer = time(NULL); </FONT></P>5 f: ~, D, B  g
<P><FONT color=#0000ff>/* converts date/time to a structure */
3 w, a/ u/ C1 Q3 V0 N( A) Qtblock = localtime(&amp;timer); </FONT></P>
! b( ]4 p" G  G1 e8 c<P><FONT color=#0000ff>printf("Local time is: %s", asctime(tblock)); </FONT></P>
" z% i  u# j  g# s<P><FONT color=#0000ff>return 0;
- l; \8 v$ y: c/ U}
' y* m0 K7 D6 ]' w4 X" W+ ?  E0 b# O8 f- P1 R7 C+ L3 Z) k
6 O, F, f1 Z8 h9 q
</FONT></P>/ H  J6 P" i4 Q' a
<P><FONT color=#ff0000>函数名: lock </FONT>
8 s% s& e( F- o* n6 W功 能: 设置文件共享锁 / @+ ?3 N/ k$ n" B, h$ M9 m
用 法: int lock(int handle, long offset, long length);
- |+ B/ _4 B" @! U" B' `程序例: </P>' ~  {2 S! x$ C! n- y
<P><FONT color=#0000ff>#include <IO.H>) a# U) @) {# ~! ~  \
#include <FCNTL.H>) \/ R6 T9 X1 w/ _+ q4 B
#include <SYS\STAT.H>
/ l6 X# G" x' @#include <PROCESS.H>9 Y# N" r+ }- E( g# _9 o  e
#include <SHARE.H>0 E2 s0 a0 b, O( V+ y3 H* p
#include <STDIO.H></FONT></P>" q9 r0 n$ j: l" }6 Z; Q/ G+ @: X
<P><FONT color=#0000ff>int main(void) 0 k$ u3 g& j% J1 ?, }8 i  \
{ 6 Q: ~. h, J9 B, p7 c- s0 h8 S
int handle, status;
# P, x* {" l; C; @* E( ]' K7 Glong length; </FONT></P>
2 q2 z: K0 K5 f<P><FONT color=#0000ff>/* Must have DOS Share.exe loaded for */   p) |+ ~% u) i  c! p: [/ s! B( a
/* file locking to function properly */ </FONT></P>9 Q: a' e! r! |
<P><FONT color=#0000ff>handle = sopen("c:\\autoexec.bat", ( r( e9 M& K, I: k1 E* a% \1 K9 G( o4 H
O_RDONLY,SH_DENYNO,S_IREAD); </FONT></P>9 [" E! a+ P: l/ G2 t. T* E- X3 T
<P><FONT color=#0000ff>if (handle &lt; 0)
9 C  l# E8 ]# R{ 3 x1 r+ r" G; S3 u& E
printf("sopen failed\n");
% Q: x% A) V  O' K: Qexit(1);
0 T) K: e. [6 F! d8 s+ J2 i, y} </FONT></P>
4 S$ e# H" I8 \( K0 ]! d: \& k% S# _<P><FONT color=#0000ff>length = filelength(handle);
# h& r+ ]8 I3 bstatus = lock(handle,0L,length/2); </FONT></P>
7 \* U  ~/ `! Z) D+ H<P><FONT color=#0000ff>if (status == 0)
9 `+ B; W4 r2 H8 U1 F; I# pprintf("lock succeeded\n");
: B2 k7 o. J. z; X( I# J4 Lelse ' N1 k+ C& h6 z  ^; {
printf("lock failed\n"); </FONT></P>' ~) ?/ J5 h& H- x7 o6 f
<P><FONT color=#0000ff>status = unlock(handle,0L,length/2); </FONT></P>
! y1 x7 V: s) Y" \1 I0 V<P><FONT color=#0000ff>if (status == 0)
7 s, f: `! d# K  A0 M! ~printf("unlock succeeded\n");
: J2 }0 J) _- e" Oelse " w. U& p3 S' d+ e9 a
printf("unlock failed\n"); </FONT></P>( ?) f/ [: c1 W
<P><FONT color=#0000ff>close(handle);
& o5 S; d8 X/ D/ t- @return 0; 4 [' \8 A3 ]% m0 G! t, M' W
}
0 n" V. T$ N: H: t. u1 J  Q</FONT>6 P" w: j; {* S
</P>0 S+ i7 l- U( ?" a) q, a6 o8 l
<P><FONT color=#ff0000>函数名: log </FONT>
7 K& T& {$ K+ ?) C3 `& _( f. p  ?功 能: 对数函数ln(x) 8 A0 l' ^. T" i
用 法: double log(double x); 2 Z5 V1 r1 Z7 K8 |
程序例: </P>
4 Q% t2 [5 G3 V6 S, Q<P><FONT color=#0000ff>#include <MATH.H>
* [! z; y& r2 F# ]3 r#include <STDIO.H></FONT></P>: m& T5 e: J# h! f
<P><FONT color=#0000ff>int main(void) 5 b. d; K3 L6 [+ `$ i7 I1 j: @# M
{
& X4 J) {) S# N5 tdouble result;
! N2 p+ p8 c, C3 j' v4 K# `& N& Vdouble x = 8.6872; </FONT></P>+ g8 _  ^" Z: N* N' r
<P><FONT color=#0000ff>result = log(x);
0 X& L' c% w0 U# kprintf("The natural log of %lf is %lf\n", x, result); </FONT></P>9 T- p( M. o$ q
<P><FONT color=#0000ff>return 0;
5 z# X8 [) O* d2 ~! `/ c} : b: j6 \' U+ k

# s# {: ~9 {8 u3 P- h</FONT></P>3 B* F0 ?& l/ f' f  K( L0 G# {
<P><FONT color=#ff0000>函数名: log10 </FONT>" c8 q6 b" C; V; L& o. }. W
功 能: 对数函数log
1 |& a8 @) o0 x6 o, e用 法: double log10(double x);
# J' M$ W; p; F- B程序例: </P>8 {' E! K: a# x  v' c' ^
<P><FONT color=#0000ff>#include <MATH.H>) k/ c. s6 V* c" `
#include <STDIO.H></FONT></P>
3 a) }0 m% u1 [+ x+ s<P><FONT color=#0000ff>int main(void)
' k7 X. z, K6 a5 K6 p2 D% b{
9 C& f2 S3 [5 T& @9 c( [' adouble result; 8 O; o6 x5 A" F- J$ o3 [
double x = 800.6872; </FONT></P>: w$ D7 ~+ X) r
<P><FONT color=#0000ff>result = log10(x); 5 z8 [5 K  j- c6 [
printf("The common log of %lf is %lf\n", x, result); </FONT></P>7 _+ D5 }# ~% Y/ y5 A: m
<P><FONT color=#0000ff>return 0;
2 l: o' Z4 G7 P9 k} 1 r! R5 O  l! M1 M, g& p7 A; v: c; J

0 t7 ^, J2 z3 x" U</FONT>6 d0 N( Y& H+ S; K0 @
</P>
/ J$ Q& ~" G8 |. @5 i: E' U<P><FONT color=#ff0000>函数名: longjump </FONT>
# r7 O; D0 T' ?0 m$ v/ ^/ v9 N, p功 能: 执行非局部转移
# ~5 o9 w9 ?" `4 F用 法: void longjump(jmp_buf env, int val); ( `$ D% ^. I4 [/ C6 R3 X) S
程序例: </P>- P" b/ B/ {& g# E- x, w
<P><FONT color=#0000ff>#include <STDIO.H>
! l8 A! `" ?+ Z5 C% M  d#include <SETJMP.H>
$ Z0 A: L5 B  r5 m- J- Y#include <STDLIB.H></FONT></P>9 M8 Z0 k& V/ r% H7 U
<P><FONT color=#0000ff>void subroutine(jmp_buf); </FONT></P>+ }! n* H! _$ F2 a! E% d& _7 K- p
<P><FONT color=#0000ff>int main(void)
1 P9 q) M4 ?  {: t, ?2 u{ </FONT></P>
% B3 M5 f% X1 N# k8 F. |* X<P><FONT color=#0000ff>int value;
# I- f( ~% X* [( e9 ijmp_buf jumper; </FONT></P>0 X/ {1 A: v) l' n
<P><FONT color=#0000ff>value = setjmp(jumper); * b% ~& ~  M4 s- J" q
if (value != 0)
+ q( e0 r. v% f9 m' d7 w' w{
; q, R' q. Q$ C+ H7 o; V/ V% ]+ ?! Pprintf("Longjmp with value %d\n", value); $ |: }2 {1 ~" F4 V  B- w$ o
exit(value);
8 i" @' D. ~% W# S2 R}
% E6 V8 Q. Z7 _8 X0 o2 L9 Z" {& uprintf("About to call subroutine ... \n");
8 T. M5 Q) ~( l6 F4 Nsubroutine(jumper); </FONT></P>
+ q/ k% T& L# I! A<P><FONT color=#0000ff>return 0; 2 g7 [8 o( R, s
} </FONT></P>
. T# B9 u; \1 r& V<P><FONT color=#0000ff>void subroutine(jmp_buf jumper) $ K5 t* D: p) M. a; W
{ 2 \7 u, d6 ~$ s, ]# y7 h
longjmp(jumper,1); 5 A$ W5 C& Z5 k$ i) }' ?
}
6 U, b7 X$ U. j$ @0 w2 `
! ]) A+ g$ N' E' l6 |* l</FONT># {$ X0 s& U6 @
</P>6 A& K2 y$ r) ^$ Y: R
<P><FONT color=#ff0000>函数名: lowvideo</FONT>
0 S5 v" c- |! W2 `8 I% S4 s功 能: 选择低亮度字符 ( i$ d, e. z) P9 z' M: Y
用 法: void lowvideo(void); . C- N( R# l6 D0 s
程序例: </P>5 E! V# M2 b1 D3 e
<P><FONT color=#0000ff>#include <CONIO.H></FONT></P>2 P6 Q' c- t# s1 b$ {4 [
<P><FONT color=#0000ff>int main(void) 2 J; f2 g! b* p$ _5 ^! i
{ - j6 q; \; T6 V9 c5 Q! p: b
clrscr(); </FONT></P>
9 T9 S- y; s  T% G/ w+ r<P><FONT color=#0000ff>highvideo();
/ U" [1 Y  T+ m& N' W$ y8 Kcprintf("High Intesity Text\r\n");
8 T/ O( q$ A( I2 L: W# Vlowvideo(); 8 w% u; F8 k3 e  _2 A
gotoxy(1,2); " J! z& ?  V8 s
cprintf("Low Intensity Text\r\n"); </FONT></P>
8 O/ r; l! @+ F/ v<P><FONT color=#0000ff>return 0;
+ H; q8 }3 ]" m) O9 \}
2 s0 h( Z, T1 V! P
- \5 K  h  z, N  Q( P/ F$ @7 `</FONT>
9 S  n9 Z) r0 [. z</P>
- k  m3 D2 p8 {& T; h<P><FONT color=#ff0000>函数名: lrotl, _lrotl </FONT>
4 |; n6 ~6 ~+ W* f功 能: 将无符号长整型数向左循环移位
; {- f' V& J4 J. P) b/ i用 法: unsigned long lrotl(unsigned long lvalue, int count);
& y# q( D# U1 m; t2 N0 q; }. z  qunsigned long _lrotl(unsigned long lvalue, int count);
# H' q+ S, ], R+ E% P1 K; e* Y程序例: </P>: [2 O) l& k9 ^& i( g
<P><FONT color=#0000ff>/* lrotl example */ 7 V5 R% A2 [5 l& `2 D8 I6 @" L1 |5 x
#include <STDLIB.H>3 G5 `5 K- w$ b# d+ I' x
#include <STDIO.H></FONT></P>
' p3 s  i. S' |) B- g& S( @* a<P><FONT color=#0000ff>int main(void) 7 ?5 K1 z9 X! G! v+ G% v
{ " j* E) m: O. u- \$ d
unsigned long result;
9 b% w7 a+ \0 \4 F0 dunsigned long value = 100; </FONT></P>) D! Q8 \1 Q! v
<P><FONT color=#0000ff>result = _lrotl(value,1);
( z8 q" ]% T1 d5 [7 ~printf("The value %lu rotated left one bit is: %lu\n", value, result); </FONT></P>& n% r, ^3 w7 z* f- r
<P><FONT color=#0000ff>return 0; # G. k# S( |1 H- `( \2 n
} % e+ {3 Q/ Y6 C8 A- f
</FONT>/ @1 \1 M" c2 [# B
</P>* ]+ l8 `* M" j; m; C4 i( H+ F; B
<P><FONT color=#ff0000>函数名: lsearch </FONT>
" e3 t9 t* B8 g2 f( @功 能: 线性搜索
% x! _3 B5 Q2 e3 `用 法: void *lsearch(const void *key, void *base, size_t *nelem, + \0 |! I. D9 I1 B
size_t width, int (*fcmp)(const void *, const void *)); : _4 ~9 z. Z( r7 I7 Q/ S! i# Y5 y6 Y
程序例: </P>
6 t; ]' Q% }$ [7 w<P><FONT color=#0000ff>#include <STDIO.H>
' y; Z4 n2 }' x# X/ I8 a$ \+ l#include <STDLIB.H></FONT></P>4 g& j( u$ P0 d
<P><FONT color=#0000ff>int compare(int *x, int *y)
# a+ ~, G; G  n) L  {, T{ ( b$ O& F' b+ j9 P6 V/ `+ l1 A
return( *x - *y );
/ y3 Q5 P: K3 i6 N) q} </FONT></P>
8 L( f, J: J/ z3 e' O- v<P><FONT color=#0000ff>int main(void) ( W) F- G1 O) Y( L) q5 K* z' i
{
1 j+ u# ?! h8 @7 p0 [1 \int array[5] = {35, 87, 46, 99, 12};
: T: ~6 o7 A' y2 c/ G$ Ysize_t nelem = 5;
$ u: k- d. ^. j: A# Nint key;
2 U6 l8 \1 D) z" k: n8 p, gint *result; </FONT></P>" V2 T: F' z+ Q0 x
<P><FONT color=#0000ff>key = 99;
$ t) o) x- d1 q+ B% s5 hresult = lfind(&amp;key, array, &amp;nelem, 8 l/ p( Z# N2 ]
sizeof(int), (int(*)(const void *,const void *))compare);
* E: P3 s% o! n: p( Pif (result)
/ ~; y2 T% K8 t, z! cprintf("Number %d found\n",key);
4 y& G' p. q" F7 telse 7 k& H; ]; j4 R& Y) h+ J
printf("Number %d not found\n",key); </FONT></P>- i* F' r  y/ k! I; ~: T
<P><FONT color=#0000ff>return 0; $ H; ^. e% G4 y. U) c0 D
}   f7 N5 I( y( Y  e/ w; F! X+ y" |

4 x1 K+ N2 V0 T1 t</FONT>* Y; J3 j/ W! E* n+ g/ x2 u
</P>
" ^+ r6 N  C- ?  u1 N* z5 @: I9 s<P><FONT color=#ff0000>函数名: lseek </FONT>
& D; e( n2 r0 B" m功 能: 移动文件读/写指针 0 x9 V( Y. y5 D/ U* r4 Z# _
用 法: long lseek(int handle, long offset, int fromwhere);
* L, r$ H8 \$ s$ o! s程序例: </P>( {: X. y3 y0 Q, t1 F; G5 b
<P><FONT color=#0000ff>#include <SYS\STAT.H>0 b+ o" q) v5 f' U4 a/ K' Q6 C
#include <STRING.H>
5 ]  B2 J1 l/ ?) [( R" R. S( ^#include <STDIO.H>
- ~' x0 @3 I- `7 S#include <FCNTL.H>
: t% o3 s% y& ?$ o. K#include <IO.H></FONT></P>3 E3 h( H. S7 e* A9 V% Z+ n
<P><FONT color=#0000ff>int main(void) 5 b. ]5 M/ b: K6 }9 v* S
{ 3 C; j( y0 Q( _7 E
int handle; * B! A9 |7 G# A' [
char msg[] = "This is a test"; 3 O& T& X8 V$ U; a( W' n
char ch; </FONT></P>
) G- l9 {3 u* ~# o& \$ L( m<P><FONT color=#0000ff>/* create a file */ 4 `# x, e# ~- F9 D/ h) b
handle = open("TEST.$$$", O_CREAT | O_RDWR, S_IREAD | S_IWRITE); </FONT></P>
7 e3 N- O" X$ R: f0 {' e<P><FONT color=#0000ff>/* write some data to the file */
4 k0 L4 v2 j! s9 [( J' Kwrite(handle, msg, strlen(msg)); </FONT></P>
/ m2 W1 B; N! K7 z<P><FONT color=#0000ff>/* seek to the begining of the file */
0 W6 y1 E6 j5 X1 K, C! ylseek(handle, 0L, SEEK_SET); </FONT></P>
$ n3 O3 G3 v+ Y1 {" s! _0 V+ K$ @<P><FONT color=#0000ff>/* reads chars from the file until we hit EOF */
/ g& R3 {+ F3 z0 v' Ydo . X: y0 O, E& ?( p0 r/ a
{ + X9 ]* c. C+ g6 N+ e" j5 r
read(handle, &amp;ch, 1);
: b- ~* d( r. E2 _# ^" Hprintf("%c", ch);
, x) Q0 E! L: l* f& K} while (!eof(handle)); </FONT></P>
7 l! I& c* g( q4 s<P><FONT color=#0000ff>close(handle);
3 q; n' i6 n7 ?+ r- [  |return 0;
/ Y0 ]' \* j( Z: P5 _$ A" u}
3 |, \2 G# N) T$ `* B</FONT></P>9 n  ?$ ?& p: {; v
<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-23 09:44 , Processed in 1.230600 second(s), 51 queries .

回顶部