Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.60/5: Рейтинг темы: голосов - 5, средняя оценка - 4.60
alur0n32

Сформировать последовательность по правилу

13.10.2014, 13:28. Показов 1080. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Последовательность 1,0,0,1,0,1,1,0,0,1,1,0,1,0... строится так: первый её элемент равен 1, остальные получаются из элементов с меньшими номерами с помощью операции отрицания: 1, если х=0; 0,если х = 1; второй элемент равен отрицанию первого т.е. 0, третий и четвёртый отрицанию первого и второго соответственно, с пятого по восьмой - отрицания 1-4 элементов соответственно и тд.
Составить программу , вычисляющую N ый член описанной последовательности (1<N<1024) вывести на экран элемент с номером N и ближайшие два соседа.
пример N=10 N=5
011 101
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
13.10.2014, 13:28
Ответы с готовыми решениями:

Сформировать последовательность по правилу
Написать программу для решения предложенной задачи:

Преобразовать последовательность по правилу
Пожалуйста, помогите решить задачу, голову сломал, суть так и не дошла до меня! Дана последовательность из n вещественных чисел....

Получить последовательность по правилу
Даны действительные числа а1,...,a16. Получить мах(а1+а16, a2+a15,...,a8+a9). Помогите нужна помощь)

1
 Аватар для APALoff
1648 / 1077 / 1081
Регистрация: 03.07.2013
Сообщений: 4,507
13.10.2014, 16:53
Лучший ответ Сообщение было отмечено как решение

Решение

Длинная арифметика или есть алгоритм попроще?

Добавлено через 7 минут
Если в ABC строки не ограничены длиной 255, а как и в ABC.NET - "немерянные", то пойдет такой вариант:
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
Var
  S : String;
 
Function notS(S0 : String) : String;
Var
  ii : Integer;
  ss : String;
Begin
  ss:=S0;
  For ii:=1 to Length(S0) do
    If S0[ii]='0' then ss[ii]:='1' else ss[ii]:='0';
  notS:=ss;
end;
 
Begin
  S:='1';
  While Length(S)<1024 do S:=S+notS(S);
  Writeln(Copy(S,5-1,3));
  Writeln(Copy(S,10-1,3));
  Writeln(S);
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
13.10.2014, 16:53
Помогаю со студенческими работами здесь

Построить последовательность по правилу
помогите составить программу на паскале

Получить новую последовательность по правилу
с комментариями если несложно

Сформировать матрицу по правилу
Помогите сделать матрицу лишь по одной картинке или подскажите с условием для неё

Сформировать массив по правилу
Задано количество членов разложения e = 2 + 1/2! + 1/3! + 1/4! + …, не превышающее 25. Сформировать массив, содержащий эти числа, вывести...

Сформировать массив по правилу
Помогите пожалуйста!!!


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Переходник USB-CAN-GPIO
Eddy_Em 20.03.2026
Достаточно давно на работе возникла необходимость в переходнике CAN-USB с гальваноразвязкой, оный и был разработан. Однако, все меня терзала совесть, что аж 48-ногий МК используется так тупо: просто. . .
Оттенки серого
Argus19 18.03.2026
Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .
SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++
8Observer8 17.03.2026
Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip
Символические и жёсткие ссылки в Linux.
algri14 15.03.2026
Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .
[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора
ФедосеевПавел 14.03.2026
Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .
делаю науч статью по влиянию грибов на сукцессию
anaschu 13.03.2026
прикрепляю статью
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++
8Observer8 10.03.2026
Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:
Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE
8Observer8 10.03.2026
Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru