Где тут ошибка?

program mile;
var
smle,miles,km: real;
begin
writeln('укажи количество км для миль');
readln(km);
miles: =km*0.62;
writeln(miles);
writeln(miles,'миль=',km,'км');
writeln('укажи количество км для sмиль');
readln(km);
km: =smle*0.54;
writeln(smle);
writeln(smle,'sмиль=',km,'км');
end.