Город А находится в х милях от города В. Вычислить расстояние между этими городами в километрах. (5 миль-8 км) программа Паскаль

5 км - 8 миль, найдём значение 1 км, оно равно 1.6 миль

Program metrivsm; / / Название программы

var

mil, km: integer; / /Создание переменной km и mil типа integer - целочисленный тип

begin / / Начало основной части кода

readln (mil); / / получаем значение с консоли (Число миль)

km: = mil*1.6; / / выполняем перевод из mil в km умножением на 1.6 (получаем километры)

println ('Город A находится в', km, 'км от города B'); / / выводим на экран надпись

end. / / Конец