Форум программистов, компьютерный форум, киберфорум
QBasic
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.67/6: Рейтинг темы: голосов - 6, средняя оценка - 4.67
22 / 22 / 19
Регистрация: 25.10.2011
Сообщений: 122
1

Выяснить можно ли из английских букв составить палиндром

25.10.2011, 13:55. Показов 1076. Ответов 5
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Всем привет! Начнем с того что новый пост на этом форуме. ps. форум зашибись )
Вобщем школьная олимпиада сдалась легко, с городской же так вряд ли проканает.
Предположительно будет что-то типа-
С клавиатуры вводятся английские буквы и символы, ввод заканчивается точкой. другие точки в тексте отсутствуют. Выяснить можно ли из английских букв составить палиндром, и если да то вывести этот палиндром на экран.
Выяснить можно или нет - как два байта переслать. а вот составить уже сложнее)
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
25.10.2011, 13:55
Ответы с готовыми решениями:

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

Вывести самый длинный палиндром, который можно составить из данных букв
Игра в карты Недавно мы имели возможность наблюдать за редким явлением. Голубой кровавый...

Множества: выяснить, можно ли из букв слова X составить слово Y
Записать программу, выясняющую, можно ли из букв слова X составить слово Y. помогите...

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

5
1255 / 705 / 359
Регистрация: 20.02.2010
Сообщений: 1,035
25.10.2011, 14:24 2
QBasic/QuickBASIC
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
DIM a(25)
DO
    INPUT b$
    c = ASC(b$) - ASC("a")
    IF c >= 0 AND c <= 25 THEN
        a(c) = a(c) + 1
    END IF
LOOP UNTIL b$ = "."
FOR i = 0 TO 25
    IF a(i) MOD 2 = 1 THEN
        a(i) = a(i) - 1
        w$ = CHR$(ASC("a") + i)
        k = k + 1
    END IF
    a(i) = a(i) / 2
NEXT
IF k <= 1 THEN
    FOR i = 0 TO 25
        FOR j = 1 TO a(i)
            f$ = CHR$(ASC("a") + i)
            n1$ = n1$ + f$
            n2$ = f$ + n2$
        NEXT
    NEXT
    res$ = n1$ + w$ + n2$
    PRINT "YES", res$
ELSE
    PRINT "NO"
END IF
из года в год почти одно и тоже..
1
1255 / 705 / 359
Регистрация: 20.02.2010
Сообщений: 1,035
25.10.2011, 14:37 3
в том году на районной были такие задания:
Вложения
Тип файла: doc tekstrayonnoy.doc (29.0 Кб, 31 просмотров)
0
22 / 22 / 19
Регистрация: 25.10.2011
Сообщений: 122
25.10.2011, 14:40  [ТС] 4
Огромное спасибо Softmob и за предоставленное решение, и за тексты районых олимпиад !
p.s. на городской олимпиаде(Находка) Среди 10 классов в прошлом году задачки были слегка *астральные*. Т.е. толком непонятно чего хотят ) и слегка недописанное условие)) у вас так же?))
0
5001 / 1673 / 409
Регистрация: 25.04.2010
Сообщений: 4,623
Записей в блоге: 2
25.10.2011, 19:55 5
Т.е. толком непонятно чего хотят ) и слегка недописанное условие)) у вас так же?))
Всегда так же, пока задания пишут стада баранов так и будет...
0
22 / 22 / 19
Регистрация: 25.10.2011
Сообщений: 122
07.11.2011, 07:43  [ТС] 6
можно небольшое пояснение к решению предоставленному софтмобом? Алгоритм хотя бы.
0
07.11.2011, 07:43
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
07.11.2011, 07:43
Помогаю со студенческими работами здесь

Дан файл, содержащий произвольный текст. Выяснить, чего в нём больше: гласных английских букв или цифр
Дан файл, содержащий произвольный текст. Выяснить, чего в нём больше: гласных английских букв или...

Как составить алгоритм для нахождения всех комбинаций из букв (английских) и цифр
помогите составить алгоритм для нахождения всех комбинаций из букв (английских) и цифр.

Из данных букв по указанным правилам составить палиндром наибольшей длины
Палиндром - это строка, которая читается одинаково как справа налево, так и слева направо. На...

Найти самый длинный палиндром, который можно составить из заданных символов
Игра в карты Недавно мы имели возможность наблюдать за редким явлением. Голубой кровавый...


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

Или воспользуйтесь поиском по форуму:
6
Ответ Создать тему
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru