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.
O que é que estou fazendo de mal ?
Obrigado