---

Радиус = 0;
ВвестиЧисло(Радиус, "Введите радиус круга");

Пи = 3.14;
ДлинаОкружности = 2 * Пи * Радиус;

Сообщить("Длина окружности равна: " + ДлинаОкружности);