язык программирования: паскальvara, b, c, min : integer; beginreadln (a); readln (b); readln (c); min : = a; if b < min thenmin : = b; if c < min thenmin : = c; writeln (min); end.
writeln('вычисление расстояния между населенными пунктами.') ; writeln('ведите исходные данные: '); writeln('масштаб карты (количество километров в одном сантиметре) > ');
read(m); writeln('расстояние между двумя точками, изображающими населенные пункты (см) > ');
read(r); writeln('расстояние между населенными пунктами ', m*r,' км.');
Популярные вопросы