Отправляет email-рассылки с помощью сервиса Sendsay
  Все выпуски  

RFpro.ru: Программирование на языке Pascal


Хостинг портала RFpro.ru:
Московский хостер
Профессиональный платный хостинг на базе Windows 2008

РАССЫЛКИ ПОРТАЛА RFPRO.RU

Чемпионы рейтинга экспертов в этой рассылке

Гуревич Александр Львович
Статус: 10-й класс
Рейтинг: 1525
∙ повысить рейтинг »
_Ayl_
Статус: Студент
Рейтинг: 1387
∙ повысить рейтинг »
Boriss
Статус: Академик
Рейтинг: 1130
∙ повысить рейтинг »

/ КОМПЬЮТЕРЫ И ПО / Программирование / Pascal

Номер выпуска:957
Дата выхода:29.10.2009, 16:30
Администратор рассылки:Калашников О.А., Руководитель
Подписчиков / экспертов:354 / 177
Вопросов / ответов:1 / 3

Вопрос № 173611: Помогите решить пожалуйста 3 задачи 1. Дано натуральное число N. Вычислить: cos1/sin1*(cos1 + cos2)/(sin1 + sin2)*...*(cos1+cos2+...+cosN)/(sin1+sin2+...+sinN) 2. Дано действительно число x. Вычислите: x-x3(степень)/3!+x5(степень)/5!-x7...



Вопрос № 173611:

Помогите решить пожалуйста 3 задачи

1. Дано натуральное число N. Вычислить: cos1/sin1*(cos1 + cos2)/(sin1 + sin2)*...*(cos1+cos2+...+cosN)/(sin1+sin2+...+sinN)

2. Дано действительно число x. Вычислите: x-x3(степень)/3!+x5(степень)/5!-x7(степень)/7!+x9(степень)/9!-x11(степень)/11!+x13(степень)/13!

3. Дано натуральное число N. Вычислить: S=1/sin1+1/(sin1+sin2)+...+1/(sin1+sin2+...+sinN).

Помогите пожалуйста до понедельника.

Отправлен: 23.10.2009, 19:07
Вопрос задал: flyso, Посетитель
Всего ответов: 3
Страница вопроса »


Отвечает Максим Юрьевич, 6-й класс :
Здравствуйте, flyso.
Ответ на вопрос № 1 - в приложении.
Старайтесь не задавать более одной задачи в вопросе.

Приложение:

Ответ отправил: Максим Юрьевич, 6-й класс
Ответ отправлен: 23.10.2009, 22:28

Как сказать этому эксперту "спасибо"?
  • Отправить SMS #thank 255765 на номер 1151 (Россия) | Еще номера »
  • Отправить WebMoney:
  • Вам помогли? Пожалуйста, поблагодарите эксперта за это!
    Отвечает Vassea, Практикант :
    Здравствуйте, flyso.
    Ответы в приложении.
    Суть 1 программы - мы храним в одной переменной сумму всех синусов, в другой - сумму всех косинусов, в третьей - конечный результат.
    При каждом проходе цикла мы мы получаем суммму синусов и сумму косинусов до i и умножаем конечный результат на их произведение
    В 3-ей - тоже самое, только там есть только сумма синусов
    Во 2-ой - в одной переменной - x^i, в другой i! При каждом проходе цикла мы умножаем значение x^i два раза на х (чтобы получить следующее значние) и вычисляем новое значение факториала
    Если будут вопросы - задавайте.

    Приложение:

    Ответ отправил: Vassea, Практикант
    Ответ отправлен: 23.10.2009, 22:39

    Оценка ответа: 5

    Как сказать этому эксперту "спасибо"?
  • Отправить SMS #thank 255766 на номер 1151 (Россия) | Еще номера »
  • Отправить WebMoney:
  • Вам помогли? Пожалуйста, поблагодарите эксперта за это!
    Отвечает LfiN, 8-й класс :
    Здравствуйте, flyso.

    Прежде всего хотелось бы Вас предупредить:

    © Цитата:
    Не задавайте несколько разных вопросов в одном.
    Не задавайте несколько разных, не связанных с друг другом вопросов, в одном. Это не запрещено (если все вопросы относятся к теме рассылки), но вероятность того, что Вы получите на них ответы, будет гораздо выше, если Вы зададите их по отдельности. Например, мало кому из экспертов захочется отвечать на вопрос, в котором просто перечислено несколько задач из задачника. Отвечать на такие вопросы неудобно, ответы трудно читаются в выпусках рассылок, затрудняется обсуждение в форуме. Поэтому большинство экспертов просто игнорируют вопросы, в которых под видом одного дано несколько вопросов или задач. Гораздо лучше, если Вы в одном вопросе спросите про решение одной проблемы, особенно, если Вы покажете, что пытались решить ее самостоятельно, и укажете, что именно вызвало трудности. Тогда многие захотят Вам помочь.


    На ваш вопрос ответил Vassea, но так как к этому времени я решил только первую задачу, то в избежании потери времени другие не стал решать.
    Вычисления проверены на Free Pascal.

    Код:
    program q173611_1;
    Uses Crt; {Подключаем библиотеку CRT для ClrScr(очистка экрана) и ReadKey(задержка экрана)}
    var i, n : integer; {i - счетчик; n - введенное натуральное число}
    p1, p2, p, proiz: real; {p1 - будет содержать числитель дроби; p2 - знаменатель; p - сама дробь; proiz - конечное произведение дробей}
    begin
    ClrScr; {Очистка экрана}

    WriteLn('Введите натуральное число N: ');
    ReadLn(n);
    p1:=0;
    p2:=0;
    proiz:=1;
    For i:=1 to n do {цикл для вычисления произведений дробей}
    begin
    p1:=p1+cos(i);
    p2:=p2+sin(i);
    p:=p1/p2;
    proiz:=proiz*p;
    end;

    WriteLn('cos1/sin1*(cos1+cos2)/(sin1+sin2)*...*(cos1+cos2+...+cosN)/(sin1+sin2+...sinN)=',proiz:6:4);
    WriteLn('Нажмите для завершения ENTER...');
    ReadKey; {задержка экрана}
    end.


    Всего доброго!!!

    Ответ отправил: LfiN, 8-й класс
    Ответ отправлен: 23.10.2009, 23:02

    Оценка ответа: 5

    Как сказать этому эксперту "спасибо"?
  • Отправить SMS #thank 255770 на номер 1151 (Россия) | Еще номера »
  • Отправить WebMoney:
  • Вам помогли? Пожалуйста, поблагодарите эксперта за это!


    Оценить выпуск »
    Нам очень важно Ваше мнение об этом выпуске рассылки!

    Задать вопрос экспертам этой рассылки »

    Скажите "спасибо" эксперту, который помог Вам!

    Отправьте СМС-сообщение с тестом #thank НОМЕР_ОТВЕТА
    на короткий номер 1151 (Россия)

    Номер ответа и конкретный текст СМС указан внизу каждого ответа.

    Полный список номеров »

    * Стоимость одного СМС-сообщения от 7.15 руб. и зависит от оператора сотовой связи. (полный список тарифов)
    ** При ошибочном вводе номера ответа или текста #thank услуга считается оказанной, денежные средства не возвращаются.
    *** Сумма выплаты эксперту-автору ответа расчитывается из суммы перечислений на портал от биллинговой компании.


    © 2001-2009, Портал RFpro.ru, Россия
    Авторское право: ООО "Мастер-Эксперт Про"
    Автор: Калашников О.А. | Программирование: Гладенюк А.Г.
    Хостинг: Компания "Московский хостер"
    Версия системы: 2009.6.10 от 26.10.2009

    В избранное