Question

Очень срочно оооооооащпзрзожа​

Answer 1

Ответ:

Pascal:

var L:real;

begin

   readln(L);

   writeln('КМ: ', L/1000000:0:2);

   writeln('М: ', L/1000:0:2);

   writeln('СМ: ', L/10:0:2);

   writeln('ММ: ', L);

end.

Объяснение: