Циклический сдвиг компонент вектора влево на одну позицию

Дан вектор Х={X1,X2...,Xk}. Осуществить циклический сдвиг компонент этого вектора влево на одну позицию, то есть получить вектор Х={X2, X3..., Xk, X1}.
В программе TurboBasic

0

TurboBasic
MaxPower55, так и скажи - ничего сам делать не буду, разжуйте мне и в рот положите.

0

Просто не шарю. Думал тут помогут

0

MaxPower55,
Вектор - это одномерный массив, допустим имеем вектор X={1, 2, 3}
Значит надо завести массив, приведу пример массива из трёх элементов:

Для произвольного кол-ва элементов просто делаем ввод, т.е.

Ввод данных в массив делаем циклом:
Циклический сдвиг влево означает, что там где было 1 - должно быть 2, там где было 2 соотв - 3,
а там где 3 - должно быть 1.

Т.е. нам нужно запомнить первый элемент, прогнать циклом от 1 до n - 1 кол-ва элементов,
приравнивая текущему следующий, а потом поставить тот элемент, который мы запомнили в конец.

Ну и чтобы посмотреть результат делаем вывод массива на экран:


А теперь подумаем какова медвежья услуга, сделанная мной, когда берёшь готовое
решение мозг деградирует, т.е. он даже не стоит на месте, он именно деградирует,
потому что такова суть человеческой психологии. И ладно бы эта задача действительно
была невероятно сложная, но ведь просто переставить местами числа, это сродни
тому как дети переставляют детали в лего конструкторе. Тут даже язык знать не
нужно, всего несколько самых базовых операторов используется. Подумайте над этим,
может быть что-нибудь в голове переключится и придёт понимание, что в любом деле
не нужно сразу сдаваться и лучше спросить тех же ребят на форуме, но попытаться
всё таки попробовать самостоятельно.

1

Спасибо большое

0

Выходит ошибка. что сделать?

Миниатюры

 

0

Сообщение от MaxPower55 что сделать?

Если программируете в TurboBasic, то прочитать справку по нему, особенно типы переменных, как задаются.
Всё же, вопреки риторическому вопросу

Сообщение от кот Бегемот а чем TurboBasic принципиально отличается от QBasic?

отличия есть. Если QBasic совместим с TurboBasic, то наоборот это работает не всегда.
Например тип переменной определяется типом данных, которые она представляет. Указание типа переменной задается соответствующим знаком после имени - !, $, %, #
Границы массива:
Если нижняя граница индексов в описании не указана, то она считается равной 0.
Используя оператор OPTION BASE n, можно задать нижнюю границу индексов равной n. Например,
В этом случае индекс элементов массива a будет принимать значения, начиная с 1.
Т.о. эта строчка
в TurboBasic будет выглядеть несколько иначе.

1

MaxPower55, зачем ты два раза X задекларировал. Выкидывай первые две строчки.
Для примера же написал, мол можно так, а можно и так.
Писал код, согласно разделу форума, т.е. QBasic. Другие компиляторы в корневом разделе
и если пишешь сюда с другим - адаптация кода на твоих плечах. У меня нету сейчас TB,
где-то валялся, но лень искать. Открой справку посмотри, как там массивы декларируются,
остальное вроде бы должно без изменений быть.

1

может посмотришь? турбо бесик на винде хп только идет. нужно эмулятор под хп ставить он 2 мб весит DosBox называется. просто сегодня со всеми одногруппниками пытались сделать, не получалось никак. пробовал 2 строки убрать опять эта же ошибка. я могу на карту тебе закинуть 50 за старания . просто преподаватель подзказки никакие не дает

0

MaxPower55, какие проблемы? Вот Вам рабочая программа. проверено в ТБ.

1

спасибо огромное

0

MaxPower55, можно ещё добавить вывод введённого массива на экран:

0