Что-то не так с программой

[dastreba]

#include <stdio.h>
#include <stdlib.h>
 
int main()
{
    int n,i;
    double R,S;
    printf("Write here: ");
    scanf("%d",&n);
S = 0;
R = 0;
for (i=1;i<=n;i++)
R=R+sin(i);
S=S+1/R;
 printf("result: %d.",S/10/8);
 
    return 0;

Суть проблемы- когда вписываю 5,то нужно чтоб вышло 8.84,а выдает число в размере 90к

Переделывал с паскаля-

program Project4_2;
 
{$APPTYPE CONSOLE}
 
uses
  SysUtils;
 
var
  n,i:integer;
  R,S:double;
 
begin
readln(n);
S:=0;
R:=0;
for i:=1 to n do begin
  R:=R+sin(i);
  S:=S+1/R;
  end;
writeln(S:10:8);
readln;
end.

[WorldMaster]

а синус то вроде как в радианах считается. Если i это градусы то их надо перевести в соответствующие единицы.

[alexzk]

printf("result: %d.",S/10/8);

writeln(S:10:8);

Я уже забыл паскаль, но там у вас, помоему, форматированый вывод. А вот для С вы написали 2 деления числа.

Вернее что-то типа (а точнее читайте справку принтф, по памяти тоже не тяну)

printf("result: %02.8d",S);

Цикл у вас

for (i=1;i<=n;i++)
R=R+sin(i);
S=S+1/R;

содержит 1 строку (в паскале 2), верно так

for (i=1;i<=n;i++)
{
R=R+sin(i);
S=S+1/R;
}

Совет - пользуйтесь IDE, с автоформатированием кода - она вам расставит все отступы и косяк сразу будет заметен глазом.

[min@y™]

А что за цель у программы? Спрашиваю потому, что в 146% случаев будет быстрее и проще написать всё с нуля, чем переводить с другого языка.

[dastreba]

Сообщение от min@y™

А что за цель у программы? Спрашиваю потому, что в 146% случаев будет быстрее и проще написать всё с нуля, чем переводить с другого языка.

нужно найти натуральный n

1/(sin 1)+1/(sin1+sin2)....1/(sin1+sin2...+sinn)

[min@y™]

Сообщение от dastreba

нужно найти натуральный n

ты там бухой, штоли? он жэж с клавы вводится!

scanf("%d",&n);

Если таки надо найти сумму, то вот:

// pascal
function shit_happens(n: DWORD): double;
var
  den: double;
  idx: DWORD;
begin
  result:= 0;
  den:= 0;

  for idx:= 1 to n do
    begin
      den:= den + sin(idx);
      result:= result + 1 / den;
    end;
end;

// C/C++
double shit_happens(DWORD n)
{
  double den = 0, sum = 0;
  
  for (double idx = 1.0; idx <= (double)n; idx += 1.0)
  {
    den += sin(idx);
    sum += 1 / den; 
  }

  return sum;
}

[Аватар]

нужно найти натуральный n

А чего задаешь этот n, если его найти надо? И для какого условия найти?

[dastreba]

Сообщение от Аватар

А чего задаешь этот n, если его найти надо? И для какого условия найти?

Для вот такого условия
1/(sin 1)+1/(sin1+sin2)....1/(sin1+sin2...+sinn)

[dastreba]

Сообщение от min@y™

ты там бухой, штоли? он жэж с клавы вводится!

scanf("%d",&n);

Если таки надо найти сумму, то вот:

// pascal
function shit_happens(n: DWORD): double;
var
  den: double;
  idx: DWORD;
begin
  result:= 0;
  den:= 0;

  for idx:= 1 to n do
    begin
      den:= den + sin(idx);
      result:= result + 1 / den;
    end;
end;

// C/C++
double shit_happens(DWORD n)
{
  double den = 0, sum = 0;
  
  for (double idx = 1.0; idx <= (double)n; idx += 1.0)
  {
    den += sin(idx);
    sum += 1 / den; 
  }

  return sum;
}

Я конечно извиняюсь,но такого мы еще не учили.
Данная программа была сделана правильно в паскале

var
  n,i:integer;
  R,S:double;
 
begin
readln(n);
S:=0;
R:=0;
for i:=1 to n do begin
  R:=R+sin(i);
  S:=S+1/R;
  end;
writeln(S:10:8);
readln;
end.

А нужно было переделать в си и где-то я допустил ошибку в написании.
Я думаю в этой строчке-

printf("result: %d.",S/10/8)

,т.к я тут написал деление,а в паскале было

writeln(S:10:8);

[alexzk]

Сообщение от dastreba

Я конечно извиняюсь,но такого мы еще не учили.
Данная программа была сделана правильно в паскале

var
  n,i:integer;
  R,S:double;
 
begin
readln(n);
S:=0;
R:=0;
for i:=1 to n do begin
  R:=R+sin(i);
  S:=S+1/R;
  end;
writeln(S:10:8);
readln;
end.

А нужно было переделать в си и где-то я допустил ошибку в написании.
Я думаю в этой строчке-

printf("result: %d.",S/10/8)

,т.к я тут написал деление,а в паскале было

writeln(S:10:8);

Я же писал выше

http://www.programmersforum.ru/showp...64&postcount=3

там не только это