Найти сумму элементов числовой последовательности

@hoch · 16.09.2014, 09:01. **Показов** 3391. **Ответов** 2

Студворк — интернет-сервис помощи студентам

Вычислить сумму 1001 члена числовой последовательности.
Числовая последовательность образуется из натуральных
чисел по следующему правилу:
Если натуральное число N нечетное, то оно является и членом
последовательности с индексом N. Если N четное, то оно делится
на степень числа 2 до тех пор, пока не станет нечетным
Решение:
Наверное это простая задача, но мне пришлось с ней долго
повозиться, я применил рекурсивную функцию и целый час
ее отлаживал. И вот главный вопрос.
Как отладить программу с помощью Паскаля?
Мне то и было нужно всего. Остановить программу и
вывести на экран значение нужной переменной.
Вот я и распечатывал целый цикл ...??

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
uses Crt;
var
   i: integer;
   s: longint;
function f(n:integer):integer;
begin
   if n mod 2 = 0 then
      begin
         n:= n div 2;
         n:= f(n)
      end;
   f:= n
end;
 
begin
   clrscr;
   s:= 0;
   for i:= 1 to 1001 do
      s:= s + f(i);
   writeln('S = ',s);
   readln
end.

@ПерС · 18.09.2014, 12:51

Как отладить программу с помощью Паскаля?

Если у тебя Турбо Паскаль - загляни в меню Debug

Оболочка Паскаля включает удобные средства отладки программ, основные требуемые команды собраны в меню Debug. Для выполнения программы по строкам достаточно нажимать F7 или F8. Разница между назначениями этих клавиш в том, что нажатие F7 пошагово выполняет программу с входом во все возможные подпрограммы, а F8 -- нет. Пока тема "Подпрограммы" не изучена, разницы в действии клавиш не будет заметно. Строка, которая будет выполняться следующей, выделена светло-зеленым цветом. Перейти сразу к нужному месту в программе можно, установив курсор на соответствующую строку и нажав клавишу F4. Выйти из режима пошагового выполнения и прервать работу отладчика позволяет сочетание клавиш Ctrl+F2.
В процессе пошагового выполнения можно посмотреть и даже изменить значения любых переменных. Для этого достаточно установить курсор на имя нужной переменной и нажать сочетание клавиш Ctrl+F4. На экране должно появиться диалоговое окно "Evaluate and Modify". В поле ввода Expression уже показано имя переменной, на которой стоял курсор. Если это не так, здесь можно задать имя любой доступной переменной или ввести произвольное выражение на Паскале. Нажатие Enter или кнопки Evaluate выводит результат в поле Result. В поле New Value можно, не прерывая пошагового выполнения, изменить значение переменной. Если предложенное изменение возможно, после нажатия кнопки Modify оно будет показано в поле Result, в противном случае там выведется сообщение "Cannot be modified". Таким образом, окно "Evaluate and Modify" позволяет гибко тестировать поведение программы при различных входных данных.
Наконец, в Паскаль встроена мощная система помощи. Нажатие клавиши F1 вызывает окно помощи по редактору, а Shift+F1 -- индекс оглавления справочной системы. В тексте помощи ссылки на другие разделы выделены желтым цветом, а переходить по ссылкам можно клавишами Tab и Shift+Tab или клавишами со стрелками. Нажатие Alt+F1 возвращает к чтению предыдущей статьи. Пользуясь выделением с помощью мыши или клавишами со стрелками при нажатой Shift, информацию из окна помощи можно копировать во встроенный буфер обмена и затем вставлять в новый или существующий файл. Соответствующие команды доступны из меню Edit. Дополнительные возможности системы помощи доступны из меню Help.
Оболочка программы Free Pascal отличается размером окна консоли, но очень похожа по управлению, так что рассматривать её отдельно не будем.

@hoch · 18.09.2014, 13:16 **[ТС]**

Спасибо!
Я Вам очень благодарен. А то для меня отладка программы
это большой дополнительный код, который выносится на
Экран, а если информации много, то в файл. Вот и разбираешь
где какая переменная и чему она равна и чему должна.
Хотя у меня есть два учебника плюс ещё два файла по Паскалю,
но ни в одном из них нет того, что Вы сказали. Лишь упоминается
что есть отладка (это когда меню описывается) и не более того.
Спасибо! Теперь я разберусь на реальной программе!
Спасибо!!

Новые блоги и статьи Все статьи Все блоги /
Автозаполнение реквизита при выборе элемента справочника Maks 27.03.2026 Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .	Сумматор с применением элементов трёх состояний. Hrethgir 26.03.2026 Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .	Автозаполнение реквизитов при создании документа Maks 26.03.2026 Программный код из решения ниже размещается в модуле объекта документа, в процедуре "ПриСозданииНаСервере". Алгоритм проверки заполнения реализован для исключения перезаписи значения реквизита,. . .	Команды формы и диалоговое окно Maks 26.03.2026 1. Команда формы "ЗаполнитьЗапчасти". Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. В качестве источника данных. . .
Кому нужен AOT? DevAlt 26.03.2026 Решил сделать простой ланчер Написал заготовку: dotnet new console --aot -o UrlHandler var items = args. Split(":"); var tag = items; var id = items; var executable = args;. . .	Отправка уведомления на почту при создании или изменении элементов справочника Maks 24.03.2026 Программная отправка письма электронной почты на примере типового справочника "Склады" в конфигурации БП3. Перед реализацией необходимо выполнить настройку системной учетной записи электронной. . .	модель ЗдравоСохранения 5. Меньше увольнений- больше дохода! anaschu 24.03.2026 Теперь система здравосохранения уменьшает количество увольнений. 9TO2GP2bpX4 a42b81fb172ffc12ca589c7898261ccb/ https:/ / rutube. ru/ video/ a42b81fb172ffc12ca589c7898261ccb/ Слева синяя линия -. . .	Midnight Chicago Blues kumehtar 24.03.2026 Такой Midnight Chicago Blues, знаешь?. . Когда вечерние улицы становятся ночными, а ты не можешь уснуть. Ты идёшь в любимый старый бар, и бармен наливает тебе виски. Ты смотришь на пролетающие. . .

@hoch Заблокирован
	18.09.2014, 13:16 [ТС]
	Спасибо! Я Вам очень благодарен. А то для меня отладка программы это большой дополнительный код, который выносится на Экран, а если информации много, то в файл. Вот и разбираешь где какая переменная и чему она равна и чему должна. Хотя у меня есть два учебника плюс ещё два файла по Паскалю, но ни в одном из них нет того, что Вы сказали. Лишь упоминается что есть отладка (это когда меню описывается) и не более того. Спасибо! Теперь я разберусь на реальной программе! Спасибо!! 0