home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The World of Computer Software
/
World_Of_Computer_Software-02-385-Vol-1of3.iso
/
m
/
mcademo3.zip
/
UNITS.PAS
/
UNITS.PAS
Wrap
Pascal/Delphi Source File
|
1991-06-12
|
548b
|
32 lines
.TXT 0 0 0 0
C a115,584,38
{\rtf1\ansi \deff0
{\fonttbl
{\f0\fnil Helv;}
{\f1\fnil Courier;}
{\f2\fnil Symbol;}
}
{\f0 \fs20 \b \i0 \ul0 UNITS EXAMPLE}
}
.EQN 3 0 0 0
Container:0.1*kg
.EQN 4 0 0 0
Volume:1000*(cm)^(3)
.EQN 4 0 0 0
Density:1.03*(gm)/((cm)^(3))
.EQN 5 0 0 0
Mass_Liquid:Volume*Density
.TXT 4 0 0 0
C a181,576,56
{\rtf1\ansi \deff0
{\fonttbl
{\f0\fnil Helv;}
{\f1\fnil Courier;}
{\f2\fnil Symbol;}
}
{\f0 \fs20 \b0 \i0 \ul Try editing the equation
below:}
}
.EQN 3 0 0 0
Mass_Liquid+Container=?kg