Составить программу, которая реализует алгоритм вычисления суммы данного ряда

@TzilizT · Регистрация: 19.10.2014

Составить программу, которая реализует алгоритм вычисления суммы данного ряда.Записать результат работы программы при заданном значении аргумента.
$https://www.cyberforum.ru/cgi-bin/latex.cgi?\sum_{k=1}^{N} \sqrt{kx} \cos kx$
Значение N= 10
Начальные данные x=2,1

Добавлено через 8 часов 53 минуты
Помогите пожалуйста

@Cyborg Drone · 20.10.2014, 01:04

Pascal

const n = 10;
var k: integer;
    x, s: real;
begin
  write('x = ');
  readln(x);
  s := 0;
  for k := 1 to n do s := s + sqrt(k * x) * cos(k * x);
  writeln('s = ', s:0:6);
  readln
end.

@TzilizT · 20.10.2014, 07:43 **[ТС]**

Благодарю.

@TzilizT 0 / 0 / 0 Регистрация: 19.10.2014 Сообщений: 6
		1
	Составить программу, которая реализует алгоритм вычисления суммы данного ряда 20.10.2014, 00:08. Показов 1380. Ответов 2 Метки нет (Все метки) Составить программу, которая реализует алгоритм вычисления суммы данного ряда.Записать результат работы программы при заданном значении аргумента. $https://www.cyberforum.ru/cgi-bin/latex.cgi?\sum_{k=1}^{N} \sqrt{kx} \cos kx$ Значение N= 10 Начальные данные x=2,1 Добавлено через 8 часов 53 минуты Помогите пожалуйста 0

@TzilizT 0 / 0 / 0 Регистрация: 19.10.2014 Сообщений: 6
	20.10.2014, 07:43 [ТС]	3
	Благодарю. 0

Опции темы

Составить программу, которая реализует алгоритм вычисления суммы данного ряда

Решение