Кол*цензура*ие Маятника

[HardCore]

Помогите, пожалуйста
Написать программу для вычисления периода кол.е.бания маятника
Спасибо!

 

[Senset]

Помогите, пожалуйста
Написать программу для вычисления периода кол.е.бания маятника
Спасибо!

вариант 1 (дана частота):
var nu:real;
begin
writeln('Введите частоту=');read(nu);
writeln('Период кол*цензура*ий=',1/nu:0:4,' с');
end.

варинат 2 (даны параметры маятника (математического))
var l,g:real;
begin
writeln('Введите длину маятника=');read(l);
g:=9.8;
writeln('Период кол*цензура*ий=',2*pi*sqrt(l/g):0:4,' с');
end.

Для физического пружинного и т.п. по аналогии.
Бгг