Написать программу, которая переводит расстояние между объектами, отмеченными на карте в фактическое расстояние. В качестве вводимых данных используется масштаб карты (км в 1 см) и расстояние между объектами на карте (см).
Решение:
| 1 2 3 4 5 6 7 8 9 10 11 | program line_11; uses crt; var km, cm, distance: real; begin clrscr; write(‘Количество км в одном см карты > ‘); readln(km); write(‘Расстояние между объектами на карте (см) > ‘); readln(cm); distance:=km*cm; write(‘Расстояние между объектами: ‘, distance:4:2, ‘ км’); readkey; end. |
Я уже 3 года торгую фьючерсами на Bybit и приглашаю тебя присоединиться и получить до $30 000 бонусами плюс скидки на комиссии:
Зарегистрироваться на Bybit
Чем больше депозит – тем больше бонусов. Также моим рефералам доступны торговые боты для трейдинга по самым выгодным тарифам.