fpcsrc/tests/webtbs/tw4013.pp


1
2
3
4
5
6
7
8
9
10
11
12
13

{ Source provided for Free Pascal Bug Report 4013 }
{ Submitted by "Miguel Garcia-Blanco" on  2005-05-25 }
{ e-mail: mgbonline@hotmail.com }
PROGRAM Test;

uses
  math;

BEGIN

    writeln( 2.0**5.0 );

END.