Перевести сумму К рублей в доллары США по курсу ММВБ на день решения задачи.Помогите срочно надо)))
Const a = 67.45;var k,d,b : real;begin writeln(Введите сумму в рублях: ); read(k); b := k/a; writeln(Ваша сумма в $: , b:3:2);end.
Оцени ответ
Вход
Регистрация
Задать вопрос
Const a = 67.45;var k,d,b : real;begin writeln(Введите сумму в рублях: ); read(k); b := k/a; writeln(Ваша сумма в $: , b:3:2);end.