Написать программу для решения циклической задачи
k=(sin(1+1)*sin(1+2)*sin(1+3)*sin(1+4)...*sin(1+5)...+n)
Пожалуйста,очень срочно.
k=(sin(1+1)*sin(1+2)*sin(1+3)*sin(1+4)...*sin(1+5)...+n)
Пожалуйста,очень срочно.
More Questions From This User See All
Answers & Comments
program raf105;
var
i,n: integer;
k: real;
begin
write('Введите N: ');
readln(n);
k:=1;
for i:=1 to n do
k:= k * sin(1+i);
writeln('k = ',k);
end.
PascalABC 3.4.2