program reset;
function toMils(count,count2:integer):integer;
begin
write(count / 1852 + count2 / 1852 * 10, ' метров, ');
writeln(count / 185200 + count2 / 185200 * 10, ' сантиметров');
end;
var a,b:integer;
read(a);
read(b);
toMils(a, b);
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
program reset;
function toMils(count,count2:integer):integer;
begin
write(count / 1852 + count2 / 1852 * 10, ' метров, ');
writeln(count / 185200 + count2 / 185200 * 10, ' сантиметров');
end;
var a,b:integer;
begin
read(a);
read(b);
toMils(a, b);
end.