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

Вопрос от посетителя:

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

Илюха отвечает:

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

Program xxx;

    Var a, b:real;

Begin

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

  readln(a);

  b:= a*1.6;

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

End.

Добавить свой ответ