Question

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

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.

Answer 1

Ответ:

WriteLn('Укажи количество км для миль');

туда нужно вставить 0.54

потом перейти на другую строку и написать

WriteLn(smle,'sмиль=',km,'км'); и написать 0.62

вроде так)