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

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

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

> Бесконечная сумма, целочисленная матрица,полидром
mtusi
сообщение 8.12.2004 1:47
Сообщение #1


Гость






завтра у меня рубежка....надо решить задачи решил уже некоторые осталось 3-4 задачи..

одну из них я уже щас почти дорешал , а вот в трех остальных требуется помощь ... очень срочная помощь....
1) дано действительное Х
вычислить приблизительное значение бесконечной суммы с точностью 0.00001

1/x + 1/(3x^3) + 1/(5x^5) + ...
x>1

2)дана целочисленная матрица размера 6*9
найти матрицу, получающуюся из данной - перестановкой строк. 1 с последней, второй с предпоследней и тд.

3)назовем натуральное число полидромом, это такое число, запись которого читается одинкого и с начала и с конца, как например, 4884
найти все, мешьше 100 числа (натуральне), которые, при возведении в квадрат образуют полидром...


ОЧЕНЬ прошу помогите мне.....щас я занят другими..а эти никак не получаются, вы меня очень выручите....
 К началу страницы 
+ Ответить 
 
 Ответить  Открыть новую тему 
Ответов
volvo
сообщение 8.12.2004 15:04
Сообщение #2


Гость






1.
Код

const
 eps = 0.00001;
var
 i: integer;
 x, s, next: real;
begin
 write('x = '); readln(x);

 s := 0; i := 1;
 repeat
   next := 1 / (i * Exp(i * Ln(x)));
   s := s + next; inc(i)
 until next <= eps;

 writeln('s = ', s:10:6);
end.


Пример определения, является ли число палиндромом, есть здесь
 К началу страницы 
+ Ответить 

Сообщений в этой теме


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

 



- Текстовая версия 26.07.2025 12:24
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"