 Удаление согласных из текста и Построение записи по образцу., Turbo Pascal 7.0 |
Прочтите прежде чем задавать вопрос!
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
| SergSIS |
 26.05.2006 10:39
Сообщение
#1
|
|
Новичок  Группа: Пользователи Сообщений: 13 Пол: Мужской Репутация:  0   |
Извините за частоту вопросов, но через два дня экзамен. Выручайте.
1. Задача: Задан текст из маленьких латинских букв, в конце точка. Напечатать в алфавитном порядке все согласные буквы, которые не входят ни в одно слово, с использованием процедуры. Представил следующее решение, но препод говорит, что неправильно. Якобы нигде не использован символ '.', т.е. текст типа mama.papa. Проверил, и с этим текстом работает. Немогу понять. Может я не так условие задачи понял? Как исправить? 2.Задача: Задано число Р. Построить запись типа: type chisco=record поле1-число; поле2- двоичное представление; поле3 - шестнадцатеричное представление; end; и напечатать. Решение ниже. Прошу Вас проверить правильно ли понято мной условие задачи по приведенному решению. Заранее благодарен, а то мозги уже зацикливаются. А экзамен на носу. Сообщение отредактировано: SergSIS - 26.05.2006 11:23 Прикрепленные файлы 
_____.txt ( 451 байт )
Кол-во скачиваний: 170
Leter.txt ( 451 байт )
Кол-во скачиваний: 164
Chislo.txt ( 527 байт )
Кол-во скачиваний: 159 |
   |
 
|
  |
Ответов(1 - 3)
| volvo |
26.05.2006 10:46
Сообщение
#2
|
|
Гость |
Следующая тема с подобным названием будет удалена сразу же...
Здесь название поменяй. Правила для тебя никто не отменял... P.S. Не изменишь название - эту тему тоже удалю. Хватит уже. Почему КТО-ТО должен все время изменять названия ЗА КОГО-ТО другого? |
|
|
|
| SergSIS |
26.05.2006 17:06
Сообщение
#3
|
|
Новичок Группа: Пользователи Сообщений: 13 Пол: Мужской Репутация: 0 |
Помогите разобратся, пожалуйста. Время поджимает.
|
|
|
|
| Malice |
26.05.2006 21:33
Сообщение
#4
|
 Профи Группа: Пользователи Сообщений: 705 Пол: Мужской Репутация: 20 |
Поставь вместо
readln (s); Код repeat и будет тебе использование точки. readln (s); if s[length(s)]<>'.' then writeln ('точку поставь..'); until s[length(s)]='.';  |
|
|
|
|
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0
|
Текстовая версия | 12.08.2025 7:52 |