Перевести мили в км

[Cotman od]

Пользователь вводит расстояние выраженное в милях нужно перевести это расстояние в км, если 1 миля=1,6км

[Alex11223]

И что конкретно не получается? Вы пробовали сделать хоть что-то?
Элементарное же задание на 3 строки кода, достаточно просмотреть главу учебника об операторах ввода\вывода, там наверняка даже рассматривается похожий пример.

[Cotman od]

хм у меня получилось не на 3 строки

program qwerty;
uses crt;
var a:real;
begin
clrscr;
writeln('Введите количество миль');
readln(a);
a:= a*1.6;
writeln('Кол-во киллометров - ',a:2:2);
readkey;
end.

[Alex11223]

ну можно сразу

writeln('Кол-во километров - ', a*1.6:2:2);

Как раз 3 строки не считая crlscr, readkey и т.п. )

[Cotman od]

всё нашел ошибку, спасибо и зачем я их нагромоздил)))))

[Alex11223]

Эм...Какую ошибку? Это не ошибка. Или это про 2 л в слове "километр"?)