можете дать программу и блок схему перевода руб в долары письменно

а как сделать блок схему

а всё поняла

constK=65,8;varr,d:integer;begin writeln('Введите рубли') ;readln(r);d:=r/K;writeln('Доллары:'d);end.---------------Ввод рублей \/Перевод рублей в доллары\/Вывод полученных долларов