Написать программу ПАСКАЛЬ вычисления расстояния между населёнными пунктами. 1)Вычислите расстояние между населёнными пунктами. 2)введитеисходные данные
var m,r:real; Begin Writeln('Вычисление расстояния между населенными пунктами.') ; writeln('ведите исходные данные:'); writeln('Масштаб карты (количество километров в одном сантиметре) ---> '); read(m); writeln('Расстояние между двумя точками, изображающими населенные пункты (см) ---> '); read(r); writeln('Расстояние между населенными пунктами ', m*r,' км.'); End.
