Дана величина М, выражающая расстояние в миллиметрах. Перевести М в более крупные единицы измерения расстояния(сантиметры-С,Километры-К)

Ответ:

Begin

Read(m);

C:=m/10;

K:=c/100000;

End.