Написать программу ПАСКАЛЬ вычисления расстояния между населёнными пунктами. 1)Вычислите расстояние между населёнными пунктами.

2)введите исходные данные

3)масштаб карты 120 (кол-во км в одном см)

4)расстояние между точками изображающими населённые пункты если между ними 3.5 (см)...(должно выйти 420км)

5) расстояние между насел. пунктами ... км

Напишите пожалуйста программу. К завтрашнему дню надо. С Паскалем проблемы

1

Ответы и объяснения

2012-03-18T15:34:37+04:00

Это Проверенный ответ

×
Проверенные ответы содержат надёжную, заслуживающую доверия информацию, оценённую командой экспертов. На "Знаниях" вы найдёте миллионы ответов, правильность которых подтвердили активные участники сообщества, но Проверенные ответы - это лучшие из лучших.

var m,r:real;

Begin

Writeln('Вычисление расстояния между населенными пунктами.') ;
writeln('ведите исходные данные:');
writeln('Масштаб карты (количество километров в одном сантиметре) ---> ');

read(m);
writeln('Расстояние между двумя точками, изображающими населенные пункты (см) ---> ');

read(r);
writeln('Расстояние между населенными пунктами ', m*r,' км.');

 

End.