запросите у пользователя курсы доллара и евро на сегодняшний день и имеющиеся у него рублёвую сумму , рассчетайте сколько долларов и евро он сможет купить. Написать алгоритм. Помогите,пожалуйста
Var a,b,c,d:longint; begin readln(a); {euro} readln(b); {usd} readln(c); {rur} writeln('USD', c div b); writeln('EUR ',c div a); end.