Question

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

Answer 1

Программа на Паскале:

Program xxx;

    Var a, b:real;

Begin

  writeln('Введите количество миль');

  readln(a);

  b:= a*1.6;

  writeln('Кол-во киллометров - ',b)

End.