Готовый запрос курса валюты с сайта НБУ по одной из валют по одной дате на основе подсказки выше. Дальше дело техники...
HTTP = Новый HTTPСоединение("bank.gov.ua",443,,,,,Новый ЗащищенноеСоединениеOpenSSL());
тхт="/NBUStatService/v1/statdirectory/exchange?valcode=EUR&date=20200109&json";
Попытка
HTTPОтвет = HTTP.Получить(Новый HTTPЗапрос(тхт));
Исключение
сообщить(ОписаниеОшибки());
КонецПопытки;
ОтветСервера = HTTPОтвет.ПолучитьТелоКакСтроку();
Чтение = Новый ЧтениеJSON;
Чтение.УстановитьСтроку(ОтветСервера);
Объект = ПрочитатьJSON(Чтение, Истина);
Для Каждого Элемент Из Объект[0] Цикл
Сообщить(Строка(Элемент.Ключ) + " " + Элемент.Значение);
КонецЦикла;