QQ登录

只需要一步,快速开始

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

函数大全(l开头)

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

823

主题

3

听众

4048

积分

我的地盘我做主

该用户从未签到

发帖功臣 元老勋章

跳转到指定楼层
1#
发表于 2004-10-4 02:58 |只看该作者 |倒序浏览
|招呼Ta 关注Ta
<><FONT color=#ff0000>函数名: labs </FONT># N0 j$ B  U: B% U8 S* l
用 法: long labs(long n); 1 {4 C, m5 ]% _, h  h8 K
程序例: </P>: {% R' C/ ?! j# g; s
<><FONT color=#0000ff>#include <STDIO.H>9 F3 q, |+ s5 e0 K
#include <MATH.H></FONT></P>1 @# Y% T( t8 b! m# R4 p- V
<><FONT color=#0000ff>int main(void) 1 i0 ^. e# m9 v/ a  F7 d6 l: [
{
" W1 X* u: d; dlong result; $ F" ~. [1 p, ]3 g2 z3 S, X
long x = -12345678L; </FONT></P>7 C- x% r# q* ?& z. U) p8 [
<><FONT color=#0000ff>result= labs(x);
! A9 z" n  x" t, nprintf("number: %ld abs value: %ld\n",
8 B( Y6 P" ?6 W0 Bx, result); </FONT></P>
' o4 c. B9 d- l) v+ H' i<><FONT color=#0000ff>return 0;
5 c7 J2 L8 U/ M- z& w; o} ( p7 ^7 k& G, z9 T+ X2 \/ i
</FONT>
: f% o: B8 t6 H" n9 A, c3 F, V, T# k6 h" u  C
</P>
8 @/ B, a% O# N# k7 ?0 L<><FONT color=#ff0000>函数名: ldexp </FONT>7 Q; A" m! ]7 _
功 能: 计算value*2的幂
5 H: t6 G7 u5 d用 法: double ldexp(double value, int exp); 7 M$ t/ ]3 F' o
程序例: </P>2 g. G2 s( w' K
<><FONT color=#0000ff>#include <STDIO.H>
) I) I2 i0 R) z8 h#include <MATH.H></FONT></P>: t4 x/ a5 U5 |) K
<><FONT color=#0000ff>int main(void) 5 Y2 Q# M  Y0 r4 k2 }! u: I  s
{ 0 K4 q! e/ g, C
double value; 8 e. @) a7 W% S$ j! d# Q
double x = 2; </FONT></P>' \4 e6 I2 F8 A* t% F6 S! P( t
<><FONT color=#0000ff>/* ldexp raises 2 by a power of 3 : h" d* e5 C, _/ Z6 w, k
then multiplies the result by 2 */ + h' |  |4 [; h! a( }
value = ldexp(x,3); ( j# f0 e1 V/ M# y- b( q
printf("The ldexp value is: %lf\n", 5 f" w& ^( t  f! n- l
value); </FONT></P>
* ?( H8 Y9 q% [% J  P5 g1 K<><FONT color=#0000ff>return 0; ; a4 G/ A: |4 Z6 |
}
/ j, N, w. }* B: W$ {) G9 v  J* `, v& r- _( w* {
</FONT></P>
+ T$ `& X6 ?. C6 k2 w4 _<><FONT color=#ff0000>函数名: ldiv </FONT>, d: ]( f* f( k# Y' `1 j
功 能: 两个长整型数相除, 返回商和余数
( E% e% N# W& s" K) ~用 法: ldiv_t ldiv(long lnumer, long ldenom);
: f- h! [: P, O6 `% i& O程序例: </P>
8 e, R+ r$ V! p4 S4 n<><FONT color=#0000ff>/* ldiv example */ </FONT></P>
& h' ~8 x( l/ m8 o" P, q- {% W6 m2 V<><FONT color=#0000ff>#include <STDLIB.H>
4 K3 U! ^! T4 v! _7 W" O#include <STDIO.H></FONT></P>9 Q, w6 J% E0 n) c
<><FONT color=#0000ff>int main(void)
  f6 W1 t+ E& _! ~) g{ . q, W: ~. g/ r2 b
ldiv_t lx; </FONT></P>
; Y# u) ^: O( ~8 d" @8 P<><FONT color=#0000ff>lx = ldiv(100000L, 30000L); % P/ S+ A3 ?& q% X2 r
printf("100000 div 30000 = %ld remainder %ld\n", lx.quot, lx.rem);
" n. a# H0 \/ O0 `7 I- oreturn 0; </FONT>
6 G+ P3 Q3 B; Q+ S" G<FONT color=#0000ff>} </FONT>
2 f+ F+ m# m+ c( @* Y; d</P>
5 O  T( k+ j. x/ l<><FONT color=#ff0000>函数名: lfind </FONT>
2 @: b# o; w7 `$ K; j8 x' h功 能: 执行线性搜索 9 J0 S, E# K3 R0 b1 v
用 法: void *lfind(void *key, void *base, int *nelem, int width,
; i, l0 b, ?* E" f1 U1 cint (*fcmp)()); 6 b) h8 h! ~/ A' ~1 V0 j1 D& n' T' i8 y
程序例: </P>
1 O, ?. A- C1 D9 O; o<><FONT color=#0000ff>#include <STDIO.H>
/ `( b5 Y) l2 _; P2 A6 L4 j#include <STDLIB.H></FONT></P>
2 a- H/ o2 u8 [8 D<><FONT color=#0000ff>int compare(int *x, int *y) 7 }: g0 T) q' h. p  z5 [7 p
{ 6 ^" u- p6 v+ }% k7 V3 Q1 p0 c' n% x
return( *x - *y );
7 n: Y9 X2 W  M+ G: f+ O} </FONT></P>1 M$ I, r0 x$ N- d9 {
<><FONT color=#0000ff>int main(void)
. Z+ W( _/ P* N- l& M" x{ - g4 X. A7 |: y, o2 a$ ~, ~# C
int array[5] = {35, 87, 46, 99, 12};
6 e# q+ e) k! p1 k' X; _size_t nelem = 5;
5 d+ ~9 h; T; ~* Aint key; # f) {7 G) W9 C
int *result; </FONT></P>
" R% |3 u$ M0 A9 \5 \<><FONT color=#0000ff>key = 99;
- \1 I4 [3 p+ [1 ?5 L# T8 Uresult = lfind(&amp;key, array, &amp;nelem,
+ a: }0 @& E* h( Rsizeof(int), (int(*)(const void *,const void *))compare);
; ?) D& W" B; l: j5 u- Bif (result)
% l' C0 I" R2 ]printf("Number %d found\n",key); & R+ _7 b! g& Q/ c- R9 B/ V$ F
else $ ?# v) l3 s' d: a' d/ c
printf("Number %d not found\n",key); </FONT></P>) B; Z' X  ^/ {# [9 G6 q) J1 s
<><FONT color=#0000ff>return 0; 3 C& T. U/ V: Z
} </FONT>
; Y7 M& T( C, o5 t: [! o' N. G( _7 [; p, G' P% a( }
</P>
4 t- j6 @3 \1 w* {2 V8 s( o0 P2 q<><FONT color=#ff0000>函数名: line </FONT>
9 s8 S6 m1 ^  R( ]3 c3 B% k功 能: 在指定两点间画一直线 * z/ s2 `7 M& w6 }
用 法: void far line(int x0, int y0, int x1, int y1); ) K+ X# J  @* t( T0 \4 ~4 k
程序例: </P>
: V4 m# e) J; a! b<><FONT color=#0000ff>#include <GRAPHICS.H>2 ~0 i) K" Y. F1 c8 e" M
#include <STDLIB.H>
' U9 F7 N# R& o$ k9 v& d#include <STDIO.H>
+ {3 q  [$ b2 K, R9 u- ]! }#include <CONIO.H></FONT></P>
& ^* J4 Y# d5 c<><FONT color=#0000ff>int main(void)
) z6 U% U& ^+ j{ 9 Q5 m2 H( D3 U6 h/ W7 J
/* request auto detection */ 5 ~/ D7 N  f* H8 T1 y1 E
int gdriver = DETECT, gmode, errorcode;
* ]4 l* G$ m1 z; Dint xmax, ymax; </FONT></P>
" k( R, O  t5 F6 v/ \' T<><FONT color=#0000ff>/* initialize graphics and local variables */
, d, v$ v0 L' U% T! T; c  Yinitgraph(&amp;gdriver, &amp;gmode, ""); </FONT></P>
, B  `& M! H7 y: f' u5 F5 S<><FONT color=#0000ff>/* read result of initialization */ , \& I5 P0 O- K7 Z2 m5 K. A4 g5 y2 @
errorcode = graphresult(); - v6 e5 \: z% q1 t: Q' D
/* an error occurred */ 4 B1 B# [, \  T. H5 E
if (errorcode != grOk) 2 W6 s* T+ A) Q( C% l2 W( F
{
9 i/ a9 |, v0 Q8 ~6 Tprintf("Graphics error: %s\n", 4 K: K1 r( x( y+ p( Y
grapherrormsg(errorcode)); + V" N+ q/ y0 F0 n( }
printf("ress any key to halt:");
$ l, e' S* d. o$ [getch();
  e( d  K& O) I  ^6 mexit(1); * w! @3 x7 l0 i+ N9 N# y
} </FONT></P>5 ]. m" e' y7 X
<><FONT color=#0000ff>setcolor(getmaxcolor()); 1 P, @" b; p( U2 `" D7 K! ~
xmax = getmaxx();
9 N$ b0 d8 s2 h1 F  Uymax = getmaxy(); </FONT></P>
8 C2 K& ~2 T" A" D<><FONT color=#0000ff>/* draw a diagonal line */ " S/ [/ A! b- H2 N( q
line(0, 0, xmax, ymax); </FONT></P>
9 Y9 [- B1 Q# L: x<><FONT color=#0000ff>/* clean up */ ( q, H; Q9 l0 s" c
getch();
, b( h( p/ ?* Q5 q- a% Z2 l! U' Eclosegraph();
  ^3 m2 p7 a% R" sreturn 0; $ e' W7 k* T. L% S2 P: I; [( }
}
/ f  t& G7 b* V7 y! v0 F  J</FONT>
4 ~& O; t1 S2 {5 h' `7 Y% h</P>6 K% c! [. r) I! r: ?- B
<P><FONT color=#ff0000>函数名: linerel </FONT>6 R! f7 S7 ]" t2 S
功 能: 从当前位置点(CP)到与CP有一给定相对距离的点画一直线
4 I( \/ n! V6 d2 n6 V, t: F+ ~用 法: void far linerel(int dx, int dy);
) w  M" |( d/ u2 g. [程序例: </P>8 l3 z' b8 x4 B4 Q
<P><FONT color=#0000ff>#include <GRAPHICS.H>
# n: H  ?1 g: J; r  ?#include <STDLIB.H>, T/ c- V0 ^  o9 s
#include <STDIO.H>. E9 R' [# A: l, |- [' |& Y
#include <CONIO.H></FONT></P>8 j: t$ g- W6 a, o; `9 Q
<P><FONT color=#0000ff>int main(void)
) g; z( p6 @0 X% T, w" R$ x5 _{ : {9 M* [* ^# W! j
/* request auto detection */
- ~2 ^: E. b' O! |, Q1 Hint gdriver = DETECT, gmode, errorcode;
- T( u6 G) G1 n5 @char msg[80]; </FONT></P>" |9 @2 d  u9 G1 i' O3 ]
<P><FONT color=#0000ff>/* initialize graphics and local variables */
5 A4 M* G/ a' v% }initgraph(&amp;gdriver, &amp;gmode, ""); </FONT></P>
0 P. j( u0 W& J8 ?<P><FONT color=#0000ff>/* read result of initialization */
# G5 h; _3 `' M) k) ?& f8 d: z' M/ |errorcode = graphresult();
; f- v2 q* G$ l4 T$ ?! b3 qif (errorcode != grOk) 1 c: v* C6 C" ?, D- k
{ # D. k: N  h2 t1 y% V& o
printf("Graphics error: %s\n", 0 _* X1 a! F7 g: _
grapherrormsg(errorcode)); : Y# |1 @; f0 K% A% n' e. h2 B/ ]1 [
printf("Press any key to halt:"); 3 b8 G9 J0 |$ }2 w3 a9 u' t, j
getch();
: r" {) r* c/ [8 @2 R* Jexit(1); 3 D' w0 O+ n/ V4 I! [( X4 M( s
} </FONT></P>
  `! Y: G- o6 r/ ]3 V<P><FONT color=#0000ff>/* move the C.P. to location (20, 30) */ + K$ X  L3 s% w6 U7 u1 d, q+ J
moveto(20, 30); </FONT></P>! M6 S5 k/ n$ ^, C
<P><FONT color=#0000ff>/* create and output a
; @: A% _& ~  O7 X. Rmessage at (20, 30) */
$ X! w) A/ c0 Ysprintf(msg, " (%d, %d)", getx(), gety());
; O! H% |% n$ }8 S3 I2 c7 q) iouttextxy(20, 30, msg); </FONT></P>
! F& J3 D% G1 J8 U' K& x& O<P><FONT color=#0000ff>/* draw a line to a point a relative
- D$ C; l1 Q) z* X. P, w' Adistance away from the current
: v( s% S. X/ n' F1 K& Rvalue of C.P. */
% r5 ~8 I7 u+ H  T' }% ^4 elinerel(100, 100); </FONT></P>
7 l# D6 I5 c1 j: ?, ^! Q<P><FONT color=#0000ff>/* create and output a message at C.P. */ " J+ E9 s* H$ E
sprintf(msg, " (%d, %d)", getx(), gety()); - x0 Y1 U. P. c& Z) z( N
outtext(msg); </FONT></P>
" d: O& Y1 y) P<P><FONT color=#0000ff>/* clean up */   f2 U' V# `/ b% |+ n* P% \$ c
getch(); . C. b/ u7 g, P4 w- F, Q# ?
closegraph(); / F; i2 R+ X( j3 g
return 0;
) ^. Z: Z/ \4 z0 f; b} </FONT>
" ^8 i- c2 j/ A</P>
2 {. J, ^/ J) Z<P><FONT color=#ff0000>函数名: localtime</FONT>   o" A. C  ?# F( J$ u% |1 w; w
功 能: 把日期和时间转变为结构
& w* F0 R. f- M' L8 S0 q5 h  d用 法: struct tm *localtime(long *clock);
' g- R" _+ j8 R. @4 o% g" L程序例: </P>; w5 D5 c" ~  Y, G
<P><FONT color=#0000ff>#include <TIME.H>, H" @# c# u' q' S& j
#include <STDIO.H>" T, ~6 X, \4 g' n+ q1 y
#include <DOS.H></FONT></P>
: W8 e4 {1 ~& p9 X<P><FONT color=#0000ff>int main(void) 5 {; a' |' ]# l* P/ f! z
{
0 {& [5 J6 m8 c* {8 C5 \$ ]. \time_t timer;
" ~. |9 k7 q7 z8 D0 Q5 c' {1 d. Istruct tm *tblock; </FONT></P>3 }8 H1 V  ]8 l. \$ c# G7 u& X
<P><FONT color=#0000ff>/* gets time of day */   S; d/ S0 w# d  q
timer = time(NULL); </FONT></P>
: W+ Q# n( k* s6 b9 d<P><FONT color=#0000ff>/* converts date/time to a structure */
- s6 f" ~. c: `+ _tblock = localtime(&amp;timer); </FONT></P>- Z* l4 l/ M% _. {$ X. j3 i' M' t
<P><FONT color=#0000ff>printf("Local time is: %s", asctime(tblock)); </FONT></P>
7 ]( i! V; X/ I) d! g, X<P><FONT color=#0000ff>return 0; - t7 T1 A6 b1 V4 I8 p
}
: F# X9 X+ _* G
; a% E! u; M5 @/ E0 x2 `, v$ A* V
</FONT></P>2 |0 O0 e7 J; H/ I- M% p3 V( x
<P><FONT color=#ff0000>函数名: lock </FONT>, \4 u: h$ l% f2 {
功 能: 设置文件共享锁 ' g  M' ?. p9 H6 H" p* h2 D; Z% @
用 法: int lock(int handle, long offset, long length); $ C* ]9 @2 B! V6 W1 ~
程序例: </P>0 v% B% b: }! I1 ]% d$ D
<P><FONT color=#0000ff>#include <IO.H>; y" Y! B% _* m; w
#include <FCNTL.H># s# y: h" w( O6 K: b
#include <SYS\STAT.H>; U, L( ]. ^3 j- R$ b
#include <PROCESS.H>/ E) n' ^. f8 n% b
#include <SHARE.H>
5 F$ O' c3 ~9 S' Z* U( M) T. L+ L#include <STDIO.H></FONT></P>: J, A* [9 Q/ G% ~, W7 O
<P><FONT color=#0000ff>int main(void) , n# L+ I( T6 A0 w) g
{   n) w( s" n1 N3 k7 X+ w
int handle, status;
6 I8 {- i! I2 z9 k, U. G! N( D( Glong length; </FONT></P>2 X' |  N# u' Z" ]& Y
<P><FONT color=#0000ff>/* Must have DOS Share.exe loaded for */ 7 f# E" ?! P1 k6 A( w
/* file locking to function properly */ </FONT></P>
( j! b% ^( l4 M9 H) n8 y+ ~4 P<P><FONT color=#0000ff>handle = sopen("c:\\autoexec.bat",
8 m2 G& k8 y2 a+ LO_RDONLY,SH_DENYNO,S_IREAD); </FONT></P>& t/ h& ]- v+ _" D
<P><FONT color=#0000ff>if (handle &lt; 0) : [8 ^9 B0 Y2 _  k# {: F
{
* s" a6 _! W' o' _; Hprintf("sopen failed\n"); 5 S) [0 U2 J6 a: L
exit(1); / L0 t; h" Y( M7 U6 h% J4 g, o
} </FONT></P>: g& s4 z( q3 S0 |8 }
<P><FONT color=#0000ff>length = filelength(handle);
+ S( w) h/ T0 j/ v+ ~) _3 Z  s- mstatus = lock(handle,0L,length/2); </FONT></P>( T  p8 \" t) M' `, Y/ N
<P><FONT color=#0000ff>if (status == 0) 8 \& v; N% m$ H2 v9 Z; ]& h4 T
printf("lock succeeded\n"); $ d  B: e! K6 T! m6 S
else 3 b0 W$ }. n# _: o6 s' s
printf("lock failed\n"); </FONT></P>, g1 u" y: i, X
<P><FONT color=#0000ff>status = unlock(handle,0L,length/2); </FONT></P>, B7 ?- D: l0 f
<P><FONT color=#0000ff>if (status == 0) 1 s$ r& F1 b2 b( J
printf("unlock succeeded\n"); # G; P, ~* G- g) P3 |
else
3 w! U8 f7 w) _" J# k2 b. w) m9 Y( rprintf("unlock failed\n"); </FONT></P>: C- [5 `( {) O7 d/ p
<P><FONT color=#0000ff>close(handle); & q5 s# _7 I' C" |, V
return 0; ! w# w7 r5 }$ x& i
}   y7 U, v! t8 r) Z: J% p
</FONT>
$ w! F: v: u3 |& F/ F, V</P>, J0 b+ ^2 t3 s! J# q1 \
<P><FONT color=#ff0000>函数名: log </FONT>4 o4 J2 d( [- Z) `; \* F3 i
功 能: 对数函数ln(x)
! ]8 u) z& I0 T- Z* `" O/ x用 法: double log(double x);
3 Z7 P" q( X- B2 {+ d  }7 C程序例: </P>
" c4 f0 J. v* Y) |3 j% P<P><FONT color=#0000ff>#include <MATH.H>
- ^; _9 s' ~* p" ?#include <STDIO.H></FONT></P>' R' y- H) i2 y* c: a. ?; o
<P><FONT color=#0000ff>int main(void) % v% C' g" `! r
{
& g3 r- Z% W, N3 J0 ydouble result;
+ L0 k, m# a) V! Z8 Odouble x = 8.6872; </FONT></P>$ K3 r. o2 X4 `' K
<P><FONT color=#0000ff>result = log(x);
' t5 w# i/ f! u" ?) H9 }, `printf("The natural log of %lf is %lf\n", x, result); </FONT></P>/ e5 p! O6 D5 G& a5 G5 Y$ Z
<P><FONT color=#0000ff>return 0;
7 F. e5 r4 j5 ~' [+ P; U}
( }5 p0 J: h! ~" {, p4 C4 s  @. Y5 \2 @  b% h2 V6 w0 y+ j- ?" L
</FONT></P>% g% N9 V9 @+ c, b6 |$ m& y3 I
<P><FONT color=#ff0000>函数名: log10 </FONT>
7 i1 \& A; y( T- M功 能: 对数函数log
4 Q% ^( J7 M1 Y  f# D用 法: double log10(double x);
( L# s2 y8 K  K- L程序例: </P>
* D, X/ z& X2 z5 z) a<P><FONT color=#0000ff>#include <MATH.H>
* x" j9 N) c2 B1 R5 Y#include <STDIO.H></FONT></P>
: u" R8 z$ p$ e6 C$ ~4 V<P><FONT color=#0000ff>int main(void) + h! f! `4 O7 n/ X$ X  F6 s
{
) S( |3 g7 Z# J, _4 W+ x8 }9 mdouble result;
& @  j, f1 e0 ]% V: Odouble x = 800.6872; </FONT></P>
8 H) x2 I+ w! |, T; p; V<P><FONT color=#0000ff>result = log10(x); # K- H  o6 `8 b; F9 c0 o
printf("The common log of %lf is %lf\n", x, result); </FONT></P>6 @" T" F* M. t  `7 p: _" D
<P><FONT color=#0000ff>return 0;
/ r3 I: F6 p6 c- V8 z1 @; U} % w9 ~9 _/ h4 b  v4 }  w
1 |3 O% Q, W5 k; T1 r& g
</FONT>
' U2 N# {2 I/ L</P>4 t' h2 I) K* C- p% H; S1 y! `& v
<P><FONT color=#ff0000>函数名: longjump </FONT>
" f( b  S0 s# m* s功 能: 执行非局部转移
; {1 `! m" |& w: g2 T用 法: void longjump(jmp_buf env, int val);   s5 R  P6 l& G! {
程序例: </P>
; P" A- b% i  \8 }1 e' M9 `6 Z/ K<P><FONT color=#0000ff>#include <STDIO.H>. C0 h- l( l. E1 @! L/ J) }/ o
#include <SETJMP.H>
8 e- p/ h8 v% Y% r9 S: R; ]#include <STDLIB.H></FONT></P>
( O: y  v, R) |+ l) B0 t# k<P><FONT color=#0000ff>void subroutine(jmp_buf); </FONT></P>
' Z1 J, r$ A9 E! U' B7 e. B8 D3 X<P><FONT color=#0000ff>int main(void)
6 V" t3 k  |) L{ </FONT></P>. |% M% \! c% t# V* [
<P><FONT color=#0000ff>int value; % ?8 _4 X/ V* p5 s' Q9 j: K
jmp_buf jumper; </FONT></P>: k9 e4 e) ?& q
<P><FONT color=#0000ff>value = setjmp(jumper); & q; e0 Y, X6 h, x, t
if (value != 0) 4 @, f1 t& L% d; [" _6 A
{
0 Z) S) d! |' B( @, C+ d) j6 @printf("Longjmp with value %d\n", value);
( O4 r5 L4 o5 b; c/ rexit(value);   ^# @% {/ y5 u! P- g0 n8 f( ^6 m
} ' a+ A# o# h4 j! T7 V8 G8 V: E
printf("About to call subroutine ... \n"); - i8 Z2 |: U. D. q( C
subroutine(jumper); </FONT></P>- D6 n3 R, M" V7 g
<P><FONT color=#0000ff>return 0; 0 _+ O! O. ]5 d8 U9 }7 n! P+ u
} </FONT></P>
5 {8 G) ?4 h, q<P><FONT color=#0000ff>void subroutine(jmp_buf jumper)
- T- m4 k: @/ s  v* h{
+ h) B( t6 U* r" klongjmp(jumper,1);
) B& {, w* B' m$ w1 h' N0 [# w} 3 K  p( _- t8 v. d" X5 ]
% O7 d. x( T8 }9 E6 ~3 a
</FONT>5 S% o9 l# W5 t- ?
</P># b7 k+ Z4 U* h5 T7 r
<P><FONT color=#ff0000>函数名: lowvideo</FONT>
# O, L. N6 ], [* I4 O功 能: 选择低亮度字符 : U( y5 F: d2 A* ^
用 法: void lowvideo(void);
) Q6 E6 l) u7 a程序例: </P>- I) a& a4 E( r0 w* `5 S1 ^
<P><FONT color=#0000ff>#include <CONIO.H></FONT></P>
3 r. j3 {9 Q6 d5 y<P><FONT color=#0000ff>int main(void) 2 ?. a4 Z3 @$ w6 c# n$ C% E
{ % h: @2 i  T% L, O
clrscr(); </FONT></P>
; L9 B2 x2 S; S6 l<P><FONT color=#0000ff>highvideo();
: P1 r) w' c4 S1 z$ zcprintf("High Intesity Text\r\n"); 8 L1 T& K0 {5 C% c4 J
lowvideo(); 0 {5 b5 i3 p' o8 E: P
gotoxy(1,2);
9 F. l% H: A& b3 _3 b6 acprintf("Low Intensity Text\r\n"); </FONT></P>+ l! \) n9 {5 D
<P><FONT color=#0000ff>return 0;
6 b" f0 `- n% W) a. T}
% k2 @- J' h+ f! `1 N" Y/ j- b7 B' K- ]* P6 q/ b
</FONT>: s# X( }6 @" A8 ^6 C( ?4 i
</P>. j, N& ~7 I6 ]+ J% R: ?+ E3 ~
<P><FONT color=#ff0000>函数名: lrotl, _lrotl </FONT>
5 w  T2 w' _# j# m# r' E3 X功 能: 将无符号长整型数向左循环移位
" I' V! g4 _1 b4 T用 法: unsigned long lrotl(unsigned long lvalue, int count);
' |  _4 X  Y& N4 sunsigned long _lrotl(unsigned long lvalue, int count); 0 G' l) x3 N0 E  ^( ]
程序例: </P>
3 s' c' h  \+ a" `/ L9 X0 q0 Z4 y<P><FONT color=#0000ff>/* lrotl example */ 1 |# H+ L9 f# d7 D/ k
#include <STDLIB.H>, m: S2 f3 `( l# w% g. F
#include <STDIO.H></FONT></P>% |2 [3 A& A8 ^/ s
<P><FONT color=#0000ff>int main(void)
2 h. Q- H/ S- A2 M) h  b# @: h, h* [8 H{
8 ~1 p: k7 q- ]unsigned long result; & |5 f5 g% ^1 p$ m
unsigned long value = 100; </FONT></P>1 y7 `! s% ~  s
<P><FONT color=#0000ff>result = _lrotl(value,1); 7 W% M0 Q; [- |3 H
printf("The value %lu rotated left one bit is: %lu\n", value, result); </FONT></P>0 k# c: g. t& a! \5 B  {# B
<P><FONT color=#0000ff>return 0;
0 ~' u& n, N% z" Y6 q4 V}
; V2 t3 L) e1 w$ Y, o. i1 j</FONT>3 b6 d- m; C% A% t& H5 q
</P>1 z) B! D" j0 f" N# e$ @5 Y3 t# o
<P><FONT color=#ff0000>函数名: lsearch </FONT>
9 k0 ?, x! _# V. \4 i+ }功 能: 线性搜索
! y4 e" q% t# z: v2 O* q4 u0 T用 法: void *lsearch(const void *key, void *base, size_t *nelem, % K  t) u2 o+ h, y: t* R
size_t width, int (*fcmp)(const void *, const void *));
/ R4 m$ {' V3 _" \3 `/ I程序例: </P>' k( E- T. r( ~
<P><FONT color=#0000ff>#include <STDIO.H>0 L3 S% B" S' L0 W% k# B
#include <STDLIB.H></FONT></P>) D$ a1 J1 f1 s" P/ D1 P8 t3 J
<P><FONT color=#0000ff>int compare(int *x, int *y) 8 Q9 J, h& a/ `( x7 q6 R
{ % L0 D5 N. x" l, {
return( *x - *y ); ( s8 I) L5 n" x) j  E. O9 \
} </FONT></P>
# n% x- r" Q9 M' H5 r7 n' l. d8 J<P><FONT color=#0000ff>int main(void) 8 [1 t0 G6 D, N1 f
{ ! H1 }7 R: C( S% X% Q7 j. s, S
int array[5] = {35, 87, 46, 99, 12};   R" C; g$ h& g% z6 V! S. Z
size_t nelem = 5; - D: P! g3 p. g( [
int key;
# g5 b& D# P1 O1 A- s5 @6 u( Yint *result; </FONT></P>
) B  a$ `" R' Y( l+ q5 B<P><FONT color=#0000ff>key = 99; & C0 @" V+ K: f6 w
result = lfind(&amp;key, array, &amp;nelem,
) a! S( w0 l! q2 Msizeof(int), (int(*)(const void *,const void *))compare);   j1 b) n& u' n6 P& Y4 e+ o. i
if (result)
) A8 v# f9 A0 K& M( E' {- ~" {printf("Number %d found\n",key); " R- Y6 ~0 B5 i
else 9 [6 `2 a% `) ?" Y% {/ ^
printf("Number %d not found\n",key); </FONT></P>
4 F, l  Z( X; T0 a" u<P><FONT color=#0000ff>return 0;
$ c2 k% S  X+ G9 L" t( V}
5 Y* S% `' h/ }, Z: h2 D$ y5 }5 }+ d( W  D
</FONT>
: T! E+ [6 d% g/ D8 u5 s</P>
4 B) q! k5 p# Y<P><FONT color=#ff0000>函数名: lseek </FONT>
! |) H0 b9 C* |% r4 H6 S, d功 能: 移动文件读/写指针
4 g8 Y7 a6 \. W( P) |+ b' G用 法: long lseek(int handle, long offset, int fromwhere);
1 {- D7 c. `; o9 W程序例: </P>& Q2 ]' S7 Q; [6 @
<P><FONT color=#0000ff>#include <SYS\STAT.H>
2 X. L6 b6 g# u% V9 s#include <STRING.H>- E" E5 R7 a6 Z1 l. O0 C
#include <STDIO.H>. g7 @8 s3 l+ o+ j. x, U
#include <FCNTL.H>
3 u6 c2 y. k6 U, [5 O#include <IO.H></FONT></P>
2 z" b6 o1 n- b" P# c; {1 a<P><FONT color=#0000ff>int main(void) ! U7 l1 K$ F; o& |
{ 6 O% s+ y! E1 {' `, Q
int handle; 8 P+ H# Z- ]6 I0 S6 r; M1 _1 f' }* u
char msg[] = "This is a test";
  g0 u: j1 U$ h. [6 b7 uchar ch; </FONT></P>% W* V! |/ d* [  r' V, u5 X
<P><FONT color=#0000ff>/* create a file */
6 g0 \9 a# ~0 v- {* uhandle = open("TEST.$$$", O_CREAT | O_RDWR, S_IREAD | S_IWRITE); </FONT></P>
% A; [. _9 u; `' Q5 V. ?<P><FONT color=#0000ff>/* write some data to the file */   z1 @: Z  [, s. S: m, ~( N
write(handle, msg, strlen(msg)); </FONT></P>
( j% t  j# V. i- K5 F3 P<P><FONT color=#0000ff>/* seek to the begining of the file */ . U3 _9 l( B* W4 F; ?7 j
lseek(handle, 0L, SEEK_SET); </FONT></P>  C5 [" A; }; V3 Q) Y  e; T
<P><FONT color=#0000ff>/* reads chars from the file until we hit EOF */
: l' Z6 A1 Q( H) i. cdo 3 s! f" F+ d+ V, ~
{
4 J; @% y/ I8 W" M" }% K. V& o' Hread(handle, &amp;ch, 1);
! f4 Z2 X% k: i& |7 X8 v( Sprintf("%c", ch);
) C4 p' w3 w( W* y6 ~% _} while (!eof(handle)); </FONT></P>
1 P; c+ C7 {+ ^<P><FONT color=#0000ff>close(handle);
8 m8 H, {" b5 e, K& F7 b1 G% Breturn 0; ' M5 ^3 ?. g. g. l# ~: |1 E0 ?
}
: @( e1 E6 ^: W* q! D2 F0 m</FONT></P>
4 o' w5 a! {+ l: }( W7 `<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 15:25 , Processed in 0.415089 second(s), 51 queries .

回顶部