Программа хранит в переменных курс доллара и евро. Пользователь вводит сумму в рублях и получает информацию о том, сколько эта сумма составляет в долларах и евро.

const   USD=64.05; // Официальный курс доллара США к рублю на 08.07.2016   EUR=70.95; // Официальный курс евро к рублю на 08.07.2016 var   RUR:real; // сумма в российских рублях begin   Writeln('Введите сумму в российских рублях: ');   Read(RUR);   Writeln('В долларах США: ',RUR/USD:0:2);   Writeln('В евро: ',RUR/EUR:0:2); end. Тестовое решение: Введите сумму в российских рублях: 15200.76 В долларах США: 237.33 В евро: 214.25