Составить программку вычисления творения P=sin 1 sin 2 sin

Составить программу вычисления творенья
P=sin 1 sin 2 sin 3...sin n

Задать свой вопрос
1 ответ
//PascalABC.NET
//Версия 3.3, сборка 1634
begin
write('P=',SeqGen(ReadInteger,x-gt;sin(x),1).Aggregate(Real(1),(a,b)-gt;a*b));
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт