function [T] = PerEkr(L)
%УхнЬсфзуз рпх хрплпгЯжей фзн ресЯпдп фпх брлпэ екксемпэт
%  КбиплйкЮ мефбвлзфЮ гйб фзн ерйфЬчхнуз фзт вбсэфзфбт
global G;
G=9.81; % ЕрйфЬчхуз вбсэфзфбт уе мпнЬдет, m/s^2

T=2*pi*sqrt(L/G);

end

