Pascal/Turbo Pascal - Ayuda con calculo simple

Buenas, tengo un problema con este programa, que pide datos al usuario, y hace unos simples calculos y los muestra en pantalla

el ccss es 8% del salario

el bp es el 1 % del salario

la deduccion total es la suma de esos 2

el prolema es que al correrlo, me sale cualquier cosa de resultado, algo como

1.230000000000000000000000E+120

cosas así

mi programa es:

program trabajador;

uses crt;

var

cedula:longint;
nombre:string;
salario, ccss, bp, totded, salneto:real;

begin(*body*)
clrscr;
writeln ('Escriba su nombre');
readln (nombre);
writeln ('Ingrese su número de cédula') ;
readln (cedula) ;
writeln ('Ingrese su salario') ;
readln (salario) ;

ccss:= ( 8 * salario ) / 100 ;
bp:= (1*salario) / 100 ;
totded:= ccss + bp ;
salneto:= salario - totded ;

writeln ('Estimado empleado ', nombre, ', en este mes su salario se desglosa así:');

writeln ('Salario bruto:', salario) ;
writeln ('8%CCSS:', ccss) ;
writeln ('1 % Banco Popular:', BP) ;
writeln ('Total de deducciones', totded) ;
writeln ('Salario Neto:', salneto) ;

readln;

end.

gracias!

Estimado asd123, el resultado no es cualquier cosa, lo que sucede que esta en notación cientifica (al menos eso creo), lo que tienes que hacer es darle formato (esto es solo para los REALES), ¿como hacerlo?.
Bueno supongamos que el calculo que deseas mostrar esta dentro de una variable de tipo real llamada "salario".
La forma de mostrarlo (ejemplo) es: WRITELN(salario:2:0);
Puedes ir amoldando como quieras el formato, solo te he dado un ejemplo.

era eso, gracias!