home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World 2000 February
/
PCWorld_2000-02_cd.bin
/
Software
/
TemaCD
/
DevPasc
/
_SETUP.3
/
DevPascal.HLP
Wrap
Text File
|
1998-09-26
|
2KB
|
55 lines
<!DOCTYPE HTML PUBLIC "-//IETF//DTD HTML 3.0//EN">
<!--Converted with LaTeX2HTML 96.1 (Feb 5, 1996) by Nikos Drakos (nikos@cbl.leeds.ac.uk), CBLU, University of Leeds -->
<HTML>
<HEAD>
<TITLE>Frac</TITLE>
<META NAME="description" CONTENT="Frac">
<META NAME="keywords" CONTENT="ref">
<META NAME="resource-type" CONTENT="document">
<META NAME="distribution" CONTENT="global">
<LINK REL=STYLESHEET HREF="ref.css">
</HEAD>
<BODY LANG="EN">
<A NAME="tex2html1452" HREF="node81.htm"><IMG WIDTH=37 HEIGHT=24 ALIGN=BOTTOM ALT="next" SRC="../buttons/next_motif.gif"></A> <A NAME="tex2html1450" HREF="node51.htm"><IMG WIDTH=26 HEIGHT=24 ALIGN=BOTTOM ALT="up" SRC="../buttons/up_motif.gif"></A> <A NAME="tex2html1444" HREF="node79.htm"><IMG WIDTH=63 HEIGHT=24 ALIGN=BOTTOM ALT="previous" SRC="../buttons/previous_motif.gif"></A> <A NAME="tex2html1454" HREF="node1.htm"><IMG WIDTH=65 HEIGHT=24 ALIGN=BOTTOM ALT="contents" SRC="../buttons/contents_motif.gif"></A> <A NAME="tex2html1455" HREF="node138.htm"><IMG WIDTH=43 HEIGHT=24 ALIGN=BOTTOM ALT="index" SRC="../buttons/index_motif.gif"></A> <BR>
<B> Next:</B> <A NAME="tex2html1453" HREF="node81.htm">Freemem</A>
<B>Up:</B> <A NAME="tex2html1451" HREF="node51.htm">Functions and Procedures</A>
<B> Previous:</B> <A NAME="tex2html1445" HREF="node79.htm">Flush</A>
<BR> <P>
<H2><A NAME="SECTION004229000000000000000">Frac</A></H2>
<P>
<A NAME="fuFrac"> </A>
<A NAME=2148> </A>
<H3><A NAME="SECTION004229100000000000000">Declaration:</A></H3>
<P>
<tt>Function Frac (X : real) : Real;</tt>
<H3><A NAME="SECTION004229200000000000000">Description:</A></H3>
<P>
<tt>Frac</tt> returns the non-integer part of <tt>X</tt>.
<H3><A NAME="SECTION004229300000000000000">Errors:</A></H3>
<P>
None.
<H3><A NAME="SECTION004229400000000000000">See also:</A></H3>
<P>
<A HREF="node117.htm#fuRound">Round</A>, <A HREF="node88.htm#fuInt">Int</A>
<P>
<DL ><DT><STRONG>Example</STRONG>
<DD>
<PRE>Program Example27;
{ Program to demonstrate the Frac function. }
Var R : Real;
begin
Writeln (Frac (123.456):0:3); { Prints O.456 }
Writeln (Frac (-123.456):0:3); { Prints -O.456 }
end.</PRE>
<P>
</DL><BR> <HR>
<P><ADDRESS>
<I>Michael Van Canneyt <BR>
Tue Mar 31 16:48:49 CEST 1998</I>
</ADDRESS>
</BODY>
</HTML>