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

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


Новое направление Портала RusFAQ.ru:
MosHoster.ru - Профессиональный хостинг

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

/ КОМПЬЮТЕРЫ И ПО / Языки программирования / Pascal

Выпуск № 501
от 28.11.2007, 12:05

Администратор:Калашников О.А.
В рассылке:Подписчиков: 244, Экспертов: 48
В номере:Вопросов: 1, Ответов: 2


Вопрос № 110658: Здравствуйте, уважаемые эксперты! 1) Дано натуральное число n. Вычислить http://i030.radikal.ru/0711/21/c2d583c93707.jpg 2) Вычислить 1-1/2+1/3...+1/9999-1/10000 способом последовательно с права на лево. Спасибо!...

Вопрос № 110.658
Здравствуйте, уважаемые эксперты!
1) Дано натуральное число n.
Вычислить http://i030.radikal.ru/0711/21/c2d583c93707.jpg
2) Вычислить 1-1/2+1/3...+1/9999-1/10000 способом последовательно с права на лево.
Спасибо!
Отправлен: 23.11.2007, 11:56
Вопрос задал: Аксенов Антон (статус: Посетитель)
Всего ответов: 2
Мини-форум вопроса >>> (сообщений: 1)

Отвечает: Coupler
Здравствуйте, Аксенов Антон!
В приложении решение обоих задач.

Приложение:

Ответ отправил: Coupler (статус: Практикант)
Ответ отправлен: 23.11.2007, 12:10

Отвечает: sergesus
Здравствуйте, Аксенов Антон!
вот ответ на первое:

var
n,k:integer;
y,x:integer;
sum,f:real;
begin
{n:=} {есле нужно то вводим n}
for k := 1 to n do
begin
f:=1/(exp(5*ln(k))); {x^y= exp(y*ln(x)) вычисляем 1/k^5}
sum:=sum+f; {наша ссумма}
end;
end.

Приложение:

Ответ отправил: sergesus (статус: 1-ый класс)
Ответ отправлен: 23.11.2007, 16:30


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

Приложение (если необходимо):

* Код программы, выдержки из закона и т.п. дополнение к вопросу.
Эта информация будет отображена в аналогичном окне как есть.

Обратите внимание!
Вопрос будет отправлен всем экспертам данной рассылки!

Для того, чтобы отправить вопрос выбранным экспертам этой рассылки или
экспертам другой рассылки портала RusFAQ.ru, зайдите непосредственно на RusFAQ.ru.


Форма НЕ работает в почтовых программах The BAT! и MS Outlook (кроме версии 2003+)!
Чтобы отправить вопрос, откройте это письмо в браузере или зайдите на сайт RusFAQ.ru.


© 2001-2007, Портал RusFAQ.ru, Россия, Москва.
Авторское право: ООО "Мастер-Эксперт Про"
Техподдержка портала, тел.: +7 (926) 535-23-31
Хостинг: "Московский хостер"
Поддержка: "Московский дизайнер"
Авторские права | Реклама на портале
Версия системы: 4.64 от 24.11.2007
Яндекс Rambler's Top100
RusFAQ.ru | MosHoster.ru | MosDesigner.ru | RusIRC.ru
Kalashnikoff.ru | RadioLeader.ru | RusFUCK.ru

В избранное