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

Question

Информатика

Евтихия

15 декабря, 09:59

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

+2

Ответы (1)

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

Клавдий · Answer 1

Program mtokm;

begin

var a:double;

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

readln (a) ;

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

a : = a / 5 * 8;

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

end.