Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 22.01.2014, 10:35   #1
METFIss
 
Регистрация: 21.01.2014
Сообщений: 7
По умолчанию две задачи на Паскаль (вычислить значения ряда с заданной точностью и вычислить формулу по элементам массива)

Не смог разобраться с двумя задачами по паскалю (5,6)
помогите пожалуйста
METFIss вне форума Ответить с цитированием
Старый 22.01.2014, 11:00   #2
Vanta11a
Lawful Evil
Участник клуба
 
Аватар для Vanta11a
 
Регистрация: 13.05.2008
Сообщений: 1,208
По умолчанию

Наработки? Цена, которую готовы заплатить?
Алгоритм - бесплатен. Поиск багов - бесплатен. Реализация алгоритма - за отдельную плату.
На форуме помогают советами и объясняют, а не пишут на халяву программы, лабы, курсачи и т.д. (c)
Vanta11a вне форума Ответить с цитированием
Старый 22.01.2014, 11:14   #3
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,792
По умолчанию

Цитата:
Не смог разобраться с двумя задачами по паскалю (5,6)
А попытки были?
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 22.01.2014, 14:03   #4
METFIss
 
Регистрация: 21.01.2014
Сообщений: 7
По умолчанию

max = h(0)
For i = 1 To 9
If h(i) > max Then max = h(i)
TextBox1.Text = max
Next i
For i = 0 To 6
If g(i) < 0 Then g(i) = max
Next i
вот что-то надумал и то неправильно,точнее не для этого варианта рно чем то похоже
METFIss вне форума Ответить с цитированием
Старый 22.01.2014, 14:05   #5
METFIss
 
Регистрация: 21.01.2014
Сообщений: 7
По умолчанию

вот для суммы s = 0
For i = 1 To 15
s = s + x ^ (2 * i) / 2 ^ i
Next i
только значения другие
METFIss вне форума Ответить с цитированием
Старый 22.01.2014, 14:07   #6
Аватар
Старожил
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Сообщений: 19,042
По умолчанию

А паскаль где?
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
Аватар вне форума Ответить с цитированием
Старый 22.01.2014, 14:13   #7
Mad_Cat
Made In USSR!
Старожил
 
Аватар для Mad_Cat
 
Регистрация: 01.09.2010
Сообщений: 3,657
По умолчанию

5)
Код:
sl:=y/a;
while abs(sl)>e do begin
s:=s+sl;
sl:=-sl*y/a;
end;
6)
Код:
b1:=f[1];b2:=f[1];       s:=0;
for i:=1 to n do begin
if f[i]<b1 then b1:=f[i];
if f[i]>b2 then b2:=f[i];
s:=s+f[i]/i;
end;
b2:=b2*b2*b2;
s:=s*b1/(b1*b1+b2);
как мне нравятся скрины, сделанные телефоном почти также как ролики, снятые мобильным с экрана компа
"...В жизни я встречал друзей и врагов.В жизни много всего перевидал.Солнце тело мое жгло, ветер волосы трепал,но я смысла жизни так и не узнал..."
(c) Юрий Клинских aka "Хой"

Последний раз редактировалось Mad_Cat; 22.01.2014 в 14:24.
Mad_Cat вне форума Ответить с цитированием
Старый 23.01.2014, 15:51   #8
METFIss
 
Регистрация: 21.01.2014
Сообщений: 7
По умолчанию

спасибо большое, осталось к ним блоксхемы придумать, если поможете было бы классно, нет и на том спасибо
METFIss вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Вычислить сумму ряда с заданной точностью: 35091_stasi Помощь студентам 2 29.10.2013 22:18
Вычислить с заданной точностью значение функции, представленной в виде бесконечного ряда _ROBERT_ Помощь студентам 7 30.10.2012 21:57
Вычислить сумму ряда с заданной точностью Tecknogleb Помощь студентам 1 20.10.2012 03:03
Pascal ABC. Вычислить сумму ряда с заданной точностью. 0kcanka Помощь студентам 0 16.05.2011 13:22
Вычислить с заданной точностью Е(эпсилон) сумму ряда Wika17 Помощь студентам 0 27.10.2010 08:10