Jack
2004-12-01 02:31:30 UTC
Hi
When I try to compile this, it says "7 / 11 3.pas
Fatal: Syntax error, : expected but identifier RADIUS found"
Any help is appreciated.
{example}
PROGRAM Functions1(OUTPUT);
{Constant Declarations}
CONST
Pi=3.14159;
VAR
Perimeter Radius :REAL;
RoundedPerimeter, TruncatedPerimeter :INTEGER;
{PROGRAM BLOCK}
BEGIN
Radius := 4.9;
Perimeter := 2*Pi*Radius
RoundedPerimeter := ROUND(Perimeter);
TruncatedPerimeter := TRUNCH(Perimeter);
WRITELN('Perimeter of the circle is', Perimeter);
WRITELN('Perimeter (rounded) is', RoundedPerimeter);
WRITELN('Perimeter (TRUNCATED) is', TruncatedPerimeter);
END.
thx
When I try to compile this, it says "7 / 11 3.pas
Fatal: Syntax error, : expected but identifier RADIUS found"
Any help is appreciated.
{example}
PROGRAM Functions1(OUTPUT);
{Constant Declarations}
CONST
Pi=3.14159;
VAR
Perimeter Radius :REAL;
RoundedPerimeter, TruncatedPerimeter :INTEGER;
{PROGRAM BLOCK}
BEGIN
Radius := 4.9;
Perimeter := 2*Pi*Radius
RoundedPerimeter := ROUND(Perimeter);
TruncatedPerimeter := TRUNCH(Perimeter);
WRITELN('Perimeter of the circle is', Perimeter);
WRITELN('Perimeter (rounded) is', RoundedPerimeter);
WRITELN('Perimeter (TRUNCATED) is', TruncatedPerimeter);
END.
thx