Разработать модуль, в котором определить простейшие процедуры:
1.Определить длину окружности С,
2.Площадь круга S,
3.Удаление L центра окружности от начала координат О.
Координаты центра окружности равны X и Y, радиус R. Вычисление С, S, L оформить в виде процедур в модуле, а их значения выдать на экран в программе.
Нужен паскаль abc.net

1. Модуль garnaga.pas// PascalABC.NET 3.2, сборка 1437 от 03.05.2017// Внимание! Если программа не работает, обновите версию!unit garnaga;interfacefunction LC(r:real):real;function SC(r:real):real;function RC(x,y:real):real;implementationfunction LC(r:real):=2*pi*r;function SC(r:real):=pi*r*r;function RC(x,y:real):=sqrt(x*x+y*y);end.2. Основная программаuses garnaga;begin  var x,y,r:real;  Writeln('Введите X, T, R: '); Read(x,y,r);  Writeln('Длина окружности ',LC(r):0:5);  Writeln('Площадь круга ',SC(r):0:5);  Writeln('Расстояние от центра до начала координат ',RC(x,y):0:5);end.3. Пример работыВведите X, T, R: 3.5 -6.7 20Длина окружности 125.66371Площадь круга 1256.63706Расстояние от центра до начала координат 7.55910