С клавиатуры вводится расстояние в метрах. Напишите программу, которая находит число полных километров и метров (пример: вы ввели число 4501, в результпте которого вы получите: 4501м=4км 501м) ПОМОГИИИИТЕ!
Плиз лучший ответ /////////////// program d; var n:integer; begin writeln('Введите число(Метры)'); readln(n); writeln('Километры ', n div 1000); writeln('Метры ', n mod 1000); readln; end.
Answers & Comments
Verified answer
Плиз лучший ответ///////////////
program d;
var
n:integer;
begin
writeln('Введите число(Метры)');
readln(n);
writeln('Километры ', n div 1000);
writeln('Метры ', n mod 1000);
readln;
end.