Паскальнапишите программу которая выражает длину в миллиметрах через количество целых километров, метров, сантиметров и миллиметровНапример 23456782 345 67 8
begin
var x: int64;
Readln(x);
Format('{0:#0 000 00 0}', x).Println
end.