Рассчитать значение, определив и использовав необходимую функцию.

N вводится с клавиатуры.

y = (1+sin (1)) / 3 + (3+sin (3)) / 3 + ... + ((2N-1) + sin (2n-1)) / 3

PascalABC

Question

Информатика

Декабринка

7 мая, 18:53

Рассчитать значение, определив и использовав необходимую функцию.

N вводится с клавиатуры.

y = (1+sin (1)) / 3 + (3+sin (3)) / 3 + ... + ((2N-1) + sin (2n-1)) / 3

PascalABC

+3

Ответы (1)

Знаете ответ на вопрос?

Вовуня · Answer 1

Var y:real; n, i:integer;

function f (x:real) : real;

begin

f: = (x+sin (x)) / 3;

end;

begin

write ('n = ') ;

readln (n) ;

y:=0;

for i:=1 to n do y:=y+f (2*i-1) ;

writeln ('y = ', y) ;

end.

Пример:

n = 5

y = 8.69759060072172

Рассчитать значение, определив и использовав необходимую функцию.N вводится с клавиатуры.y = (1+sin (1)) / 3 + (3+sin (3)) / 3 + ... + ((2*N-1) + sin (2*n-1)) / 3PascalABC

Рассчитать значение, определив и использовав необходимую функцию.

N вводится с клавиатуры.

y = (1+sin (1)) / 3 + (3+sin (3)) / 3 + ... + ((2N-1) + sin (2n-1)) / 3

PascalABC