Помогите PASCAL ОЧЕНЬ Безотлагательно)))S=sinx+sin2x+sin3x+...+sin7x

Помогите PASCAL ОЧЕНЬ Безотлагательно)))
S=sinx+sin2x+sin3x+...+sin7x

Задать свой вопрос
1 ответ
Задача на циклы. 

var
x,i:integer;
s:real;
begin
   write('vvedite x: ');
   readln(x);
   for i:=1 to 7 do s:=s+sin(i*x);
   writeln('s=', s);
end.

что здесь сложного?
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт