Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Vlad2328
0 / 0 / 0
Регистрация: 18.01.2013
Сообщений: 14
#1

Найти значение функции y=sin1+sin2+. sinN если N=15 - Pascal ABC

19.01.2013, 22:00. Просмотров 872. Ответов 2
Метки нет (Все метки)

Найти значение функции y=sin1+sin2+... sinN если N=15
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
19.01.2013, 22:00
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Найти значение функции y=sin1+sin2+. sinN если N=15 (Pascal ABC):

Даны натуральное n, действительное x. Вычислить:sin x + sin2 x + … + sinn x;
Даны натуральное n, действительное x. Вычислить:sin x + sin2 x + … + sinn x;

Дано натуральное число N. Вычислить: (1/sin1)*(1/sin1+sin2)*.*(1/sin1+sin2+.+sinN)
Дано натуральное число N. Вычислить:...

Не понимаю как составить программу вычисления суммы и произведения ряда sin1, sin2, sin3, ., sinN
Составить программу вычисления суммы и произведения ряда sin1, sin2, sin3, ...,...

Вычислить значение функции: у = sin2(a-|x+2|)
3. Вычислить значение функции: у = sin2(a-|x+2|).

Определить значение функции y= cos^2(sin1/z)
№1 Определить значение функции y= cos^2(sin1/z); помогите пожалуйста ,...

Определить значение функции y= cos^2(sin1/z)
№1 Определить значение функции y= cos^2(sin1/z);

2
Leshiy27
Страж леса
25 / 25 / 24
Регистрация: 13.12.2012
Сообщений: 146
19.01.2013, 22:33 #2
Лучший ответ Сообщение было отмечено Vlad2328 как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
uses crt;
var
f:real;
i,n:integer;
begin
writeln('Введите N');
readln(n);
for i:=1 to n do
f:=f+sin(i);
writeln('Y= ',f);
end.
Добавлено через 22 секунды
как то так
1
Taftis
Pascal, Delphi, C++
215 / 128 / 91
Регистрация: 01.12.2012
Сообщений: 628
19.01.2013, 23:39 #3
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
program zadacha;
uses crt;
var i,n: integer;
    f:real;
begin
write('vvedite n= ');
readln(n);
 
for i:=1 to n do begin
  F:=F+sin(i);
  end;
writeln ('znachenie function F=',F:6:2);
end.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
19.01.2013, 23:39
Привет! Вот еще темы с решениями:

Вычислить значение функции y= x2, если x<0,x3, если x³0
помогите пожалуйста решить эту задачу,а то у меня что то не получаеться(((...

Рассчитать значение y определив и использовав необходимую функцию y= ((1+sin1+3+sin3+5+sin5)/3)
Рассчитать значение y определив и использовав необходимую функцию y=...

Вывести значение функции если y = x3 + 1
Вывести значение функции если y = x3 + 1 в промежутках 1 &lt;= х и * х &lt;0; у =...

Вычислить значение функции: х2, если х>0
4. Вычислить значение функции: х2, если х&gt;0 у = х-1, если х≤0


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

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

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