|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу. Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста". Название темы слишком короткое или не отражает сути вашего вопроса. Тема исчерпала себя, помните, один вопрос - одна тема Прочитайте правила и заново правильно создайте тему. |
|
Опции темы | Поиск в этой теме |
06.04.2008, 23:06 | #1 |
Регистрация: 06.04.2008
Сообщений: 3
|
удвоение символа
уважаемые програмисты помогите.
немугу заставить правильно работать программу при проверке четности программа зацикливается. На паскале. ввести произвольную символьную цепочку. удвоить ее символы на четных местах, затем ывести полученную символьную цепочку в обратном порядке. |
06.04.2008, 23:07 | #2 |
Участник клуба
Регистрация: 26.10.2007
Сообщений: 1,244
|
И где ваш код, который я жажду поправить до работующей версии?
Умом Россию не понять, пока не выпито ноль пять,
А если выпито ноль пять всё делом кажется не хитрым, Попытка глубже понимать уже попахивает литром... |
07.04.2008, 07:59 | #3 |
Старожил
Регистрация: 13.10.2007
Сообщений: 2,740
|
Задача конечно супер, аж в два действия с одной процедурой и двумя циклами, которые так и норовят зациклиться.
Код:
|
07.04.2008, 09:56 | #4 |
Форумчанин
Регистрация: 30.03.2008
Сообщений: 392
|
Код:
Программирование - это великое искусство... Такое же как например и живопись!
Последний раз редактировалось ACE Valery; 13.02.2011 в 12:50. |
07.04.2008, 09:57 | #5 |
Форумчанин
Регистрация: 30.03.2008
Сообщений: 392
|
Еще можно проверять стоит ли символ на четном / нечетном элементе функцией odd
Функция odd( i ) проверяет, является ли аргумент i нечетным и возвращает "истину", если это действительно так. Тип аргумента- целый, тип результата- логический.
Программирование - это великое искусство... Такое же как например и живопись!
|
07.04.2008, 11:43 | #6 | ||
Старожил
Регистрация: 13.10.2007
Сообщений: 2,740
|
Цитата:
if i mod 2 = 0 then ... Цитата:
И вообще, прежде чем о чем-то писать, следует посмотреть что написали до вас. |
||
07.04.2008, 21:12 | #7 |
Регистрация: 06.04.2008
Сообщений: 3
|
Уважаемый puporev спасибо вам огромное. Может быть еще подскажите почему у меня при включении модуля crt паскаль пишет ошитку "попытка деления на ноль" ошибка 200. где нужно "подкрутить" и что подрегулировать чтобы этого небыло ?
|
07.04.2008, 21:29 | #8 | ||
Участник клуба
Регистрация: 26.10.2007
Сообщений: 1,244
|
Цитата:
АДД: А в книжке пишут: Цитата:
Умом Россию не понять, пока не выпито ноль пять,
А если выпито ноль пять всё делом кажется не хитрым, Попытка глубже понимать уже попахивает литром... Последний раз редактировалось Карась; 07.04.2008 в 21:33. |
||
07.04.2008, 21:33 | #9 | |
Новичок
Джуниор
Регистрация: 18.01.2008
Сообщений: 1,720
|
Цитата:
|
|
07.04.2008, 22:18 | #10 |
Старожил
Регистрация: 06.08.2007
Сообщений: 2,183
|
Вот рабочая версия.
Код в формате Дос кодировки(можно через блоконот в файл с расширением *.pas пихнуть). Модуль CRT подключен лишь ради очистки экрана вначале, можно удалить, если ненужно. Код:
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Удаление символа в строке | Fantom | Общие вопросы Delphi | 2 | 23.06.2008 16:03 |
шифрование символа | TRISTAR | Общие вопросы C/C++ | 2 | 08.06.2008 01:35 |
Удаление символа в ячейке | Flangini | Microsoft Office Excel | 2 | 05.05.2008 14:02 |
вопрос о цвете символа | Ceprey | Общие вопросы C/C++ | 5 | 01.05.2008 20:53 |
последНИЕ 3 символа... | PAVEL315 | Общие вопросы Delphi | 6 | 23.02.2007 11:20 |