|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
17.12.2013, 22:56 | #1 |
Новичок
Джуниор
Регистрация: 17.12.2013
Сообщений: 19
|
Возведение в степень
Помогите решить задачу на паскале.
Найдите сумму a^-1+a^-2+a^-4+a^-8+...+(a^-2)^n |
18.12.2013, 01:30 | #2 |
Регистрация: 10.12.2013
Сообщений: 3
|
Я правда не додумал как можно сделать первый член (a^-1) сделать в формуле. Поэтому примерно так. Дальше может сам(-а) додумаешь.
P.s. Степень делал через экспоненты так как паскаль не воспринимал "^". Код:
Последний раз редактировалось Stilet; 18.12.2013 в 10:44. |
18.12.2013, 08:15 | #3 |
Новичок
Джуниор
Регистрация: 11.10.2011
Сообщений: 3,882
|
Код:
|
18.12.2013, 12:58 | #4 | |
Новичок
Джуниор
Регистрация: 17.12.2013
Сообщений: 19
|
Цитата:
|
|
18.12.2013, 13:11 | #5 |
Новичок
Джуниор
Регистрация: 17.12.2013
Сообщений: 19
|
У меня получилось так. Спс Вам за помощь.
PROGRAM PR; USES CRT; VAR N,I,A,:INTEGER; s:REAL; BEGIN CLRSCR; WRITELN('INPUT N');READLN(N); WRITELN('INPUT A');READLN(A); s:=0; FOR I:=1 TO N DO BEGIN S:=S+1/(exp(exp(i*ln(2))*ln(a))); END; WRITELN(S+1/a:2:4); READKEY; END. Последний раз редактировалось neolanta; 18.12.2013 в 13:30. |
18.12.2013, 13:24 | #6 | |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
Цитата:
Это, конечно, хорошо, но что же Вы не воспользовались кодом Poma][a из пост #3 ?! На мой взгляд он намного короче, проще, понятнее, эффективней. Да и красивее, в конце концов! или Вы в нём не разобрались?! или забыли, что такое отрицательная степень? ( что A в степени -K, это единица, делённая на A в степени K )? |
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Возведение в степень | XYLIGANXYL | Общие вопросы по Java, Java SE, Kotlin | 7 | 17.09.2016 15:20 |
возведение в степень | [CODER] | Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM | 6 | 14.04.2014 10:18 |
Возведение в степень | Dima-War | Общие вопросы C/C++ | 7 | 18.03.2012 09:37 |
возведение в степень | ILNARM | Паскаль, Turbo Pascal, PascalABC.NET | 16 | 16.10.2009 23:04 |
возведение в степень | Lissisa | Помощь студентам | 1 | 21.03.2009 22:34 |