Problema com pascal

program Area_Circulo;

const 

        PI = 3.141519265;

    var

        Area, Comprimento, Raio    : real;

    BEGIN

        writeln( 'Digite o Raio : ' );

        readln( Raio );

        Area      := PI * Raio * Raio;

        Comprimento := 2 * PI * Raio;

        writeln( 'Área = ´, Area );

        writeln( 'Comprimento da Circunferencia = ', Comprimento );

    END.