[Nelson1992]

Мне нужна помощь в написании программы к заданию:

1. На языке программирования Pascal реализовать процедуры работы со стеком на последовательном распределении памяти:

- Создание пустого стека

- Добавление элемента на вершину стека

- Удаление элемента с вершины стека

Процедуры, реализующие операции добавления и удаления элемента должны разумным образом обрабатывать ситуации переполнения и нехватки (схемы (2а), (3а)). Стек реализовать, используя одномерный массив и переменную типа integer (указатель на вершину стека).

Т ← Т + 1; если T > M то ПЕРЕПОЛНЕНИЕ, иначе Х[Т] ← Y (2a)

(включить в стек)

если T = 0 то НЕХВАТКА, иначе Y ← X[T]; Т ← Т - 1 (3a)
(исключить из стека)

2. Провести вычислительный эксперимент с полученными процедурами

a) Используя результат задания 1 запрограммировать получение нового текстового файла, в котором все слова во всех предложениях записаны в обратном порядке. В программе установить максимальный размер стека равным 10.

b) Используя результат задания 1 запрограммировать получение нового текстового файла, в котором в котором буквы каждого слова записаны в обратном порядке. В программе установить максимальный размер стека равным 5.

В процессе работы программы должна выводить текущее состояние стека (после каждой операции добавления, извлечения, очистки).

Вот текст который должен содержаться в текстовом файле:

Придется идти ва-банк...
- Ты не вправе слышать его имя!
- Я вправе на все, - сообщает монстр.
И пальцы сжимаются.
Теперь должен произойти выход в реальность. Как следствие
"смертельного" воздействия. Иначе - мозг может вообразить самый настоящий
болевой шок, со всеми последствиями.
Только самоубийца отключит предохранители дип-программы.
Или дайвер.
Мое изуродованное тело валяется на ладони монстра. Череп расплющен,
один глаз смотрит в пыльное жаркое небо, другой - в каменный ноготь. Ифрит
громко, удовлетворенно хохочет, потом кричит:
- Ты, пришедший в облике волка, запомни его судьбу!
Ага, вот как он определил язык... слышал наши разговоры. Однако ему
не хватило "ума" понять, с кем имеет дело...
Монстр снова каменеет. Я выжидаю еще секунду, потом встаю. Тело
медленно собирается воедино. Нормальный пользователь дип-технологии сейчас
очнулся бы в реальности, перед укоризненно верещащим компьютером.
Учитывает ли сторожевая программа "Аль-Кабара" существование
дайверов?
Монстр неподвижен. Я мертв, давно мертв... Осторожно ступаю на
волосяной мост...
- Кто ты?

[stalker-ust]

Ребята,помогите в написании программу в множестве!!
а то препод сожрет всю группу....

Путем ввода целых чисел создать множество. Определить, входят ли в данное множество числа, введенные с клавиатуры.

заранее спасибо....

[Drongo]

stalker-ust, Если напишу на С++ перевести на Pascal сможете? Есть кому?

Вообще логика этой программы такая(как я понял):

1. Запрашиваем ввод числа, которое создаст массив нужного нам размера (размер нашего множества)
2. Заполняем наше множество, запрашиваем у пользователя ввод чисел. Вводим столько чисел, какой размер имеет массив.
3. После заполнения, запрашиваем у пользователя ввод любого целого числа.
4. Проверяем в цикле с массивом, если в массиве нет введённого числа - значит число не входит, иначе - входит.

[stalker-ust]

давай))

[Drongo]

stalker-ust, Вот. Надеюсь поможет. Проверку того что число не входит в множество, я не делал.

Код:

#include <iostream>
using namespace std;

int main()
{
   int size;  // Размер массива
   int *array; // Наш динамический массив
   int num, // Вводимое числ для проверки в массиве
   z;

   // Запрашиваем ввод размера массива
   cout << "  Введите размер массива = ";
   cin >> size;

   // Проверяем, пока введённое число меньше 1
   // предлагать ввод правильного значения
   while(size < 1){
      cout << "  Введите размер массива = ";
      cin >> size;
     }

   // Создаём массив
   array = new int[size];

   // Заполняем массив, вводом чисел с клавиатуры
   for(int i = 0; i < size; i++){
      cout << "Введите значение в массив, элемент array[" << i << "] = ";
      cin >> array[i];
     }

   // Предлагаем пользователю ввести любое число
   // Его мы будем проверять на наличие присутствующих
   // чисел в массиве.
   cout << "Введите любое целое число = ";
   cin >> num;

   // Проверяем, если ведённое число есть в массиве
   // Выводим число и индекс массива
   for(int j = 0; j < size; j++)
      if(array[j] == num)
         cout << "Введённое число: " << num << " находится в массиве array[" << j << "]" << endl;

   delete [] array; // Освобождаем память

   cin >> z;
   return 0;
}

P.S. Результат перевода на Pascal жду в этой теме.

[pasha2009k]

азное - Всё о TURBO PASCAL (обсуждение, помо

Среда програмирования: ABS Pascal

Задача: Пусть задано 10 русских имён. Проверьте все ли имена написаны с прописной буквы, если нет,то исправте ситуацию.

Если можно то задачку в лс!
Заранее спасибо.

[Drongo]

Если можно то задачку в лс!»

и кофе тоже подать?

Задача для первоклассника. Проверяете первую букву имени и если она в нижнем регистре, то переводите её в верхний. В чём трудность-то?

[Nayan]

Пожалста,Напишите программу,которая считывает данные из текстового файла,содержащего одномерный массив произвольной длины,отображает данные в виде графика,вычисляет количество элементов в массиве,среднее значение, среднее квадратичн.отклонение и выводит полученн.результаты на экран. Срочно надо.

[Glareone]

Пожалста,Напишите программу,которая считывает данные из текстового файла,содержащего одномерный массив произвольной длины,отображает данные в виде графика,вычисляет количество элементов в массиве,среднее значение, среднее квадратичн.отклонение и выводит полученн.результаты на экран. Срочно надо. »

на каком языке надо написать?ничего особенного в задаче нету.

1)посимвольное чтение из файла до пробела,преобразование из цифр в число.
2) перевыделение памяти для массива, добавление нового числа (вместо перевыделения можно подсчитать общее кол-во элементов в файле с помощью цикла while(!eof) и уже выделить необходимое кол-во )
3) график можно нарисовать с помощью символов( * - | ) не прибегая к использованию регистров или graph.h
4) остальные задачи-математические на 2 строки.

[Nayan]

Прога на паскале,мне поставили срок до завтра.Выручите? Это при устройстве на работу меня решили проверить,а я подзабыл уже,2года назад отучился.