Помощь - Поиск - Пользователи - Календарь
Полная версия: сумма ряда
Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи
qwer
Здравствуйте! я учусь в 8 классе, но нам задают такие задачи, что я не могу решить. Если сможете помогите.

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


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

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

заранее благодарю за помощь!!!
klem4
Сам пробовал что-нибудь сделать ? Попробуй начать делать сам, не получится поможем ;)
qwer
я пробовал первую решть, но нифига! если бы без дробей я бы решил!
а со второй ваще глухо, даже не представляю как её решать!
klem4
Ладно, разбирайся и убедись как все просто на самом деле!

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.
qwer
Спасибо щас попробую!!! yes2.gif
klem4
Цитата
Спасибо щас попробую!!! yes2.gif


Во втором задании у меня начальные 15 чисел упорядочены по возрастанию, как изменить программу для твоего варианта подумай сам rolleyes.gif
qwer
Странно, но в перврй задаче паскаль выдаёт ошибку! в строке S:= 0

а во второй всегда показывает ответ 1 blink.gif ????
klem4
Цитата(qwer @ 2.10.2006 19:57) *

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

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


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


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


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

а вторую задачу я так и не понял. wacko.gif
volvo
Первую строку как положено набери... Самую первую... {$N+} <--- Вот эту !!!
qwer
Всё первую кое как решил! осталась вторая. wink.gif
volvo
Цитата
а вторую задачу я так и не понял.
Что именно не понятно во второй задаче? Ты ее проверял? Какие данные вводил, что у тебя все время выходит 1 в ответе?
qwer
я вобще не понял третью строку. что обозначает ряд чисел (1,2,6,9,12,13,17,28,39,50,61,72,83,94,99); и откуда они берутся. наверное из - за этого я не понял задачу в целом.

=guns=
Они берутся произвольно. Просто рост учеников считается заранее заданным.
Гость
Я учюсь в 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!!!!!
volvo
Разложение функции в ряд рассматривалось здесь:
FAQ: Общие вопросы по математике

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