[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
  • Страница 1 из 1
  • 1
Помогите решить пожалуйста 3 задачи на PASCAL
GROZNYДата: Воскресенье, 14 Декабря 2008, 08:27 | Сообщение # 1
Начинающий
Группа: Пользователи
Сообщений: 5
Награды: 0
Замечания: 0%
Статус:
Люди добрые Помогите решить пожалуйста 3 задачи на PASCAL, а то через 3 дня экзамен. Не успеваю решить, и изза этого не могу получить допуск к экзамену. Если не принесу то отчислят. =(( Помогите. ПЛИЗ!

1) Абаракадабра:
Последовательность из латинских букв строится следующим образом. На первом шаге она пуста. На каждом последующем шаге последовательность удваивается, после чего к ней слева дописывается очередная буква латинского алфавита (а, b, с, ...). Ниже приведены первые шаги построения последовательности:
Шаг 1. пустая последовательность
Шаг 2. а
Шаг 3. baa
Шаг 4. cbaabaa
Шаг 5. dcbaabaacbaabaa
Задача состоит в том, чтобы по заданному числу N определить символ, который стоит на N-ом месте в последовательности, получившейся после 26-го шага.

Технические требования:
Входной файл: INPUT.TXT
Выходной файл: OUTPUT.TXT

Ограничение времени: 20 секунд

Формат входных данных: Во входном файле записано одно натуральное число N (1 <= N <= 2в26степени).

Формат выходных данных: Запишите в выходной файл символ, стоящий в позиции N получившейся последовательности.

Пример файлов входных и выходных данных:
INPUT.TXT OUTPUT.TXT
4 w

------------------------------------------------------
2) Криптограмма

Текст закодирован с помощью таблицы, в которой цифрой 0 обозначено отверстие. Для того, чтобы раскодировать сообщение, нужно наложить сетку на текст так, чтобы в отверстия были видны символы закодированного текста. Сначала на таблицу букв накладывается исходная сетка и читается набор символов, затем сетка поворачивается по часовой стрелке на 90 градусов и читается следующий набор символов и так далее до полного оборота сетки на 360 градусов. Напишите программу SHIFR, которая с помощью сетки расшифровывает закодированный текст.

Входные данные:

Текст и решетка задаются в виде квадратных таблиц в текстовых файлах SHIFR1.DAT и SHIFR2.DAT соответственно, каждая строка таблицы размещается в отдельной строке файла, элементы вводятся через пробел.

Выходных данные:

Файл SHIFR.SOL содержит строку расшифрованного текста.

Пример входных данных:

SHIFR1.DAT

ж б в у н р

и ы н е я е

к х м б р р

о г у р л к

т и р я о о

с е н ю е т

SHIFR2.DAT

1 0 1 0 1 0

1 1 1 1 0 1

1 1 0 1 1 1

1 0 1 1 0 1

1 1 1 1 1 0

1 1 1 0 1 1

Пример выходных данных:

SHIFR1.SOL
бурямглоюнебокроетвихриснежныекрутя

------------------------------------------------------

3) Игра Быки и Овцы.
Компьютер загадывает четырехзначное число, все цифры которого разные, а первая цифра - не 0.
Игрок пытается отгадать это число и вводит свои варианты ответа в предусмотренное для этого текстовое поле, а затем нажимает кнопку 'ввод'. Если игрок угадал и цифру, и ее место, то это 'бык', если угадал цифру, но поставил ее на другое место - 'овца'.
Например, если загадано число '2715'. то в результате попытки "4752" будет "1 бык, 2 овцы". Ведется статистика. Игра заканчивается, когда игрок угадал число. Если игрок вводит число с одинаковыми цифрами или нулем на первом месте, то попытка не защитывется и выводится сообщение с предложением внимательно изучить правила. На второй раз игрок получает предупреждение, а в случае троекратного нарушения правил действия его расцениваются как злостное хулиганство и приложение автоматически закрывается. После того, как число угадано, выводится сообщение с поздравлением и предложением сыграть еще раз. Если игрок не угадал число за 10 попыток, то игра автоматически завершается, игроку сообщается загаданное число.

Заранее благодарен!

 
GROZNYДата: Воскресенье, 14 Декабря 2008, 09:45 | Сообщение # 2
Начинающий
Группа: Пользователи
Сообщений: 5
Награды: 0
Замечания: 0%
Статус:
Ну пожалуйста!!! помоги!
 
AndriyДата: Вторник, 23 Декабря 2008, 00:01 | Сообщение # 3
Группа: Гости





begin
if j = 0 then j:=1 ch:="";
else
ch:=chr(i)+ch+ch;
end;

a naxera begin i and esli u tebia prostoi cikl s 1 instrukciei??? moonw

 
  • Страница 1 из 1
  • 1
Поиск: