Составьте программу для вычисления количества километров К, которое содержится в Х милях (1 миля = 1,60935 км). Количество

var m, k: real; // где m — количество миль, вводится с клавиатуры; k — количество километров.

begin

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

writeln (\'Количество миль равно \'); readln (m); k := m * 1.60935; cls; writeln (\'Количество километров в \', m, \' милях равно \', k);end.