Переводчик
// переводим текст переданного объекта с помощью Yandex
// если ключ работать не будет, то перейдите по ссылке и получите свой ключ
// https:// yandex.ru/dev/translate/doc/dg/reference/translate-docpage/
Текст = Этот.Параметр.Текст;
Если (Текст="") Тогда Возврат; Конец;
Направление = "en-ru";
РусскиеБуквы = "абвгдежзийклмнопрстуфхцчшщъыьэюя";
к = Строки.Длина(РусскиеБуквы);
Для н = 1 По к Цикл
Если (Строки.Найти(Текст, Строки.Подстрока(РусскиеБуквы, н, 1))>0) Тогда
Направление = "ru-en";
Прервать;
Конец;
Конец;
Ключ = "trnsl.1.1.20200414T150902Z.67f177a28d70f00a.c1997501bfb31807a7f4bb88557509f60a21aaae";
ПутьКСтранице = "https://translate.yandex.net/api/v1.5/tr.json/translate?key="+ Ключ + "&lang="+ Направление + "&text="+ Текст;
Ответ = Сайты.Прочитать(ПутьКСтранице, "UTF8");
Перевод = Строки.Между(Ответ, "[""", """]");
// Сообщить(Ответ);
// Уведомить(Перевод, Текст);
Напомнить(Текст+Символы.ПС+Символы.ПС+Перевод, "Переводчик", 20, 0xD4FF7F, 12, 200, 100, 400, 100);