IPB
ЛогинПароль:

> Прочтите прежде чем задавать вопрос!

1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!

 
 Ответить  Открыть новую тему 
> сумма ряда
сообщение
Сообщение #1





Группа: Пользователи
Сообщений: 7
Пол: Мужской
Реальное имя: Сергей

Репутация: -  0  +


Здравствуйте! я учусь в 8 классе, но нам задают такие задачи, что я не могу решить. Если сможете помогите.

вычислить сумму ряда 2/3 + 3/4 + 4/5 + 5/6 до 10/11


и ещё одна ваще сложная

известны данные о росте 15 юношей класса, упорядоченные по убыванию. Нет ни одной пары учеников одинакового роста. В начале учебного года поступил новый ученик. Какое место в перечне роста он занимает?
Известно, что рост его не совпадает с ростом ни одного ученика. Превышает самого низкого и меньше самого высокого.
P.S. условный оператор не использовать

заранее благодарю за помощь!!!
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #2


Perl. Just code it!
******

Группа: Пользователи
Сообщений: 4 100
Пол: Мужской
Реальное имя: Андрей

Репутация: -  44  +


Сам пробовал что-нибудь сделать ? Попробуй начать делать сам, не получится поможем ;)


--------------------
perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #3





Группа: Пользователи
Сообщений: 7
Пол: Мужской
Реальное имя: Сергей

Репутация: -  0  +


я пробовал первую решть, но нифига! если бы без дробей я бы решил!
а со второй ваще глухо, даже не представляю как её решать!
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #4


Perl. Just code it!
******

Группа: Пользователи
Сообщений: 4 100
Пол: Мужской
Реальное имя: Андрей

Репутация: -  44  +


Ладно, разбирайся и убедись как все просто на самом деле!

1)

{$N+}

uses crt;

var

x: Integer;
s: Single;

begin

clrscr;

s := 0;

for x := 2 to 10 do
s := s + x / (x + 1);


writeln('s = ', s : 3 : 2);


readln;

end.


2)

Если все условия соблюдены :

uses crt;

const

s : array [1..15] of Integer = (1,2,6,9,12,13,17,28,39,50,61,72,83,94,99);

var

n, i: Integer;

begin

clrscr;

write('n = '); readln(n);

i := 1;

while (i <= 15) and (n > s[i]) //первое условие не обязательно, если все суловия точно соблюдены smile.gif
do inc(i);

writeln('Position = ', i);

readln;
end.


--------------------
perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #5





Группа: Пользователи
Сообщений: 7
Пол: Мужской
Реальное имя: Сергей

Репутация: -  0  +


Спасибо щас попробую!!! yes2.gif
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #6


Perl. Just code it!
******

Группа: Пользователи
Сообщений: 4 100
Пол: Мужской
Реальное имя: Андрей

Репутация: -  44  +


Цитата
Спасибо щас попробую!!! yes2.gif


Во втором задании у меня начальные 15 чисел упорядочены по возрастанию, как изменить программу для твоего варианта подумай сам rolleyes.gif


--------------------
perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #7





Группа: Пользователи
Сообщений: 7
Пол: Мужской
Реальное имя: Сергей

Репутация: -  0  +


Странно, но в перврй задаче паскаль выдаёт ошибку! в строке S:= 0

а во второй всегда показывает ответ 1 blink.gif ????
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #8


Perl. Just code it!
******

Группа: Пользователи
Сообщений: 4 100
Пол: Мужской
Реальное имя: Андрей

Репутация: -  44  +


Цитата(qwer @ 2.10.2006 19:57) *

Странно, но в перврй задаче паскаль выдаёт ошибку! в строке S:= 0

а во второй всегда показывает ответ 1 blink.gif ????


1) Дааа это самая опасная строка в программе ... ЧТОЖЕ за ошибка там у тебя ?
2) Ты вот эти условия учел ?
Цитата(задание)
Известно, что рост его не совпадает с ростом ни одного ученика. Превышает самого низкого и меньше самого высокого.


и эти :
Цитата(klem4)
Во втором задании у меня начальные 15 чисел упорядочены по возрастанию, как изменить программу для твоего варианта подумай сам


??


--------------------
perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #9


Гость






Цитата(klem4 @ 2.10.2006 18:06)
1) Дааа это самая опасная строка в программе ... ЧТОЖЕ за ошибка там у тебя ?
Как видно, "Error 116: Must be in 8087 mode to compile this.", ибо не понимают люди, что не все, что выглядит как комментарий на самом деле является комментарием!
 К началу страницы 
+ Ответить 
сообщение
Сообщение #10





Группа: Пользователи
Сообщений: 7
Пол: Мужской
Реальное имя: Сергей

Репутация: -  0  +


да эта ошибка! что делать то??

а вторую задачу я так и не понял. wacko.gif
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #11


Гость






Первую строку как положено набери... Самую первую... {$N+} <--- Вот эту !!!
 К началу страницы 
+ Ответить 
сообщение
Сообщение #12





Группа: Пользователи
Сообщений: 7
Пол: Мужской
Реальное имя: Сергей

Репутация: -  0  +


Всё первую кое как решил! осталась вторая. wink.gif
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #13


Гость






Цитата
а вторую задачу я так и не понял.
Что именно не понятно во второй задаче? Ты ее проверял? Какие данные вводил, что у тебя все время выходит 1 в ответе?
 К началу страницы 
+ Ответить 
сообщение
Сообщение #14





Группа: Пользователи
Сообщений: 7
Пол: Мужской
Реальное имя: Сергей

Репутация: -  0  +


я вобще не понял третью строку. что обозначает ряд чисел (1,2,6,9,12,13,17,28,39,50,61,72,83,94,99); и откуда они берутся. наверное из - за этого я не понял задачу в целом.

 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #15





Группа: Пользователи
Сообщений: 2
Пол: Мужской

Репутация: -  0  +


Они берутся произвольно. Просто рост учеников считается заранее заданным.
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #16


Гость






Я учюсь в 10 классе - у нас Паскаль первый год !!!!!!!!!!!! По разным причинам я пропустил последнии занятия в этом месяце . У нас 5-ая лаб.раб. Задание- составить прогу для вычисления суммы функционалтного ряда и ф-ции y=f(x) ? S=сумма(значок пахож на 'E') cos*n ( n в степени х) / n!(факториал) всё умножить на x в степени n. 0.1<=x<=1 y=e в степени cosx умножить на cos (sinx) PLESS HELP ME!!!!!
 К началу страницы 
+ Ответить 
сообщение
Сообщение #17


Гость






Разложение функции в ряд рассматривалось здесь:
FAQ: Общие вопросы по математике

Читай, разбирайся...
 К началу страницы 
+ Ответить 
сообщение
Сообщение #18


Гость






Прочитал ничего не понял , а здавать завтра . Может всё-таки кто-нить поможет . Заранее СПАСМБО!!! Вот мой ряд НА ПАСКАЛЕ - : S=cyMMa(как E) ((cosn*x)/n!)*x в степени n ... промежуток 0.1<=x<=... ф-ция y=e в степени cosx * cos(sinx)......
 К началу страницы 
+ Ответить 
сообщение
Сообщение #19


Гость






Ну чё может кто-нить поможет!? PLEEZZZZZZz
 К началу страницы 
+ Ответить 

 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 





- Текстовая версия 20.04.2024 9:10
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name