Составьте программу для преобразования расстояние x в милях в расстояние k в километрах приняв что 5 миль равно 8 км исходное расстояние в милях задается с клавиатуры.

Question

Информатика

Евтихия

13 ноября, 20:08

Составьте программу для преобразования расстояние x в милях в расстояние k в километрах приняв что 5 миль равно 8 км исходное расстояние в милях задается с клавиатуры.

+3

Ответы (1)

Знаете ответ?

Клавдий · Answer 1

Program mtokm;

begin

var a:double;

writeln ("Введите расстояние в милях: ") ;

readln (a) ;

writeln ("Расстояние в милях: ", a) ;

a : = a / 5 * 8;

write ("Расстояние в км: ", a) ;

end.