Преглед изворни кода

+ Added Power() function example in ex78.

michael пре 27 година
родитељ
комит
be96507b3e
2 измењених фајлова са 8 додато и 1 уклоњено
  1. 1 1
      docs/refex/Makefile
  2. 7 0
      docs/refex/ex78.pp

+ 1 - 1
docs/refex/Makefile

@@ -37,7 +37,7 @@ OBJECTS=ex1 ex2 ex3 ex4 ex5 ex6 ex7 ex8 ex9 ex10 ex11 ex12 ex13 ex14 \
         ex28 ex29 ex30 ex31 ex32 ex33 ex34 ex35 ex36 ex37 ex38 ex39 ex40 \
         ex41 ex42 ex43 ex44 ex45 ex46 ex47 ex48 ex49 ex50 ex51 ex52 ex53 \
         ex54 ex55 ex56 ex57 ex58 ex59 ex60 ex61 ex62 ex63 ex64 ex65 ex66 \
-        ex67 ex68 ex69 ex70 ex71 ex72 ex73 ex74 ex75 ex76 ex77
+        ex67 ex68 ex69 ex70 ex71 ex72 ex73 ex74 ex75 ex76 ex77 ex78
 
 TEXOBJECTS=$(addsuffix .tex, $(OBJECTS))
 

+ 7 - 0
docs/refex/ex78.pp

@@ -0,0 +1,7 @@
+Program Example78;
+
+{ Program to demonstrate the Power function. }
+
+begin
+  Writeln (Power(exp(1.0),1.0):8:2); { Should print 2.72 }
+end.