Форум программистов, компьютерный форум, киберфорум
Free Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.90/68: Рейтинг темы: голосов - 68, средняя оценка - 4.90
0 / 0 / 2
Регистрация: 17.01.2013
Сообщений: 7
1

Вычислить (1+sin 0,1) (1+sin 0,2) . (1+sin 10)

17.01.2013, 21:13. Показов 12632. Ответов 2
Метки нет (Все метки)

Вычислить (1+sin 0,1) (1+sin 0,2) ... (1+sin 10)

Помогите сделить не могу разобратся.
Зарание Спасибо.
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
17.01.2013, 21:13
Ответы с готовыми решениями:

Дано натуральное число N. Вычислить S=sin x+ sin sinx +...+sin sin....sin x
Дано натуральное число N. Вычислить S (составить программу с использованием операторов While и...

Дано целое число N (>0). Найти сумму Sin(x) + Sin(2x) + … + Sin(Nx)
А можно сделать чтоб одна строка все суммировала, или write(тут код). условие вв

(sin(a + b) - cos(a) * sin(b) / (cos(a- b) - sin(a) * sin(b)
(sin(a + b) - cos(a) * sin(b)) / (cos(a- b) - sin(a) * sin(b))

Вычислить sin(x) и tg(x), если известен cos(x)
Известно, что cos x=0,8; x є . Найти sin x и tg x.

__________________
2
СуперМодулятор
133 / 132 / 48
Регистрация: 03.11.2012
Сообщений: 974
18.01.2013, 18:49 2
Лучший ответ Сообщение было отмечено СфантазиейНапряг как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
var
 result,index:real;
 begin
 index:=0.1;
 result:=1+sin(index);
 while index<=10 do
  begin
   index:=index+0.1;
   result:=result*(1+sin(index));
  end;
  Writeln(result:4:25);
 end.
Вроде так. Насколько понял, там между скобками умножение.
1
0 / 0 / 2
Регистрация: 17.01.2013
Сообщений: 7
18.01.2013, 19:01  [ТС] 3
Цитата Сообщение от Izobara Посмотреть сообщение
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
var
 result,index:real;
 begin
 index:=0.1;
 result:=1+sin(index);
 while index<=10 do
  begin
   index:=index+0.1;
   result:=result*(1+sin(index));
  end;
  Writeln(result:4:25);
 end.
Вроде так. Насколько понял, там между скобками умножение.
да там умножить..
Большое спсибо.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
18.01.2013, 19:01

Заказываю контрольные, курсовые, дипломные работы и диссертации здесь.

Вычислить значение выражения z=1-e^2a*(sin^3(2a)/sqrt(cos(a))
Program example1; Var a,z,e:integer; begin writeln('Chislo a:='); readln(a);...

Сформировать квадратную матрицу порядка N по правилу A[i,j]=sin(j^2-j^2/N)
Сформировать квадратную матрицу порядка N по правилу A=sin(j^2-j^2/N) и подсчитать количество...

Не правильно считается Sin(x) - на проге одно н калькуляторе другое
Похоже, что я что-то не правильно делаю. Вопрос дурацкий Калькулятор выдаёт sin(2874,19863) =...

вычислить с помощью цикла:sin(1)+sin(2)+sin(3)+...sin(n)
1.Длинная последовательность двузначных чисел вводится клавиатуры. Признаком конца ввода является...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.