Pascal/Turbo Pascal - no se mucho y necesito AYUDA!!!!!!!!

COMO RESUELVO ESTE EJERCICIO:
HACER UN PROGRAMA EN EL Q SE INGRESE UNA DISTANCIA EN KILOMETROS Y LA EXPRESE EN CENTIMETROS Y METROS.

POR FAVOR SI ALGUIEN ME PUEDE AYUDAR... PLEASE!!!!! javascript:insTag(\

{Esto puede servirte como referencia}

program kilometros;
uses
crt;
var
kilome : real;
metros : real;
centim : real;
begin
clrscr;
writeln('Entre Kilometros ');
readln(kilome);
metros := kilome * 1000;
centim := kilome * 100000;
writeln;
writeln('Kilometros = ',kilome:12:2);
writeln('Metros = ',metros:12:2);
writeln('Centimetros = ',centim:12:2);
readln;
end.