Помощь - Поиск - Пользователи - Календарь
Полная версия: Символьные данные
Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи
A.K.
Люди помогите плз! С клавиатуры вводится текст - последовательность символов,возможно пустая,за которой следует точка.В сам текст точка не входит.Определить,удовлетворяет ли введеный текст следующему свойству: Текст является записью четного числа в семеричной форме.
volvo
И что? Что именно не получается?

Что такое четное число в семеричной форме не знаешь? Делаешь так: во-первых, проверяешь, является ли этот текст (до точки) вообще записью семеричного числа (то есть, состоит ли он ТОЛЬКО из символов '0' .. '6'). Ну, и если никаких других символов нет, то переводи этот текст в 10-ную с/с (как это сделать - см. FAQ: Общие вопросы по математике) и проверяй на четность...
Lapp
Цитата(volvo @ 25.01.2006 20:51) *

переводи этот текст в 10-ную с/с ... и проверяй на четность...

Решение Volvo абсолютно верное, но оно демонстрирует математичность способа его мышления (в смысле анекдота про то, как вскипятить чайник smile.gif ) - он приводит задачу к уже известной.
Но в данном случае решение несколько упростится, если использовать признак четности числа в семиричной сисеме счисления: для четности числа в семиричной с/с необходимо и достаточно, чтобы сумма всех его цифр была четной. Доказательство этого факта я запостил в раздел Математика, так как он не имеет прямого отношения ни к Паскалю, ни вообще к программированию (см. здесь ).
Осталось добавить, что цифры хоть и семиричные, складывать их (а точнее, выводить и проверять сумму) можно в десятичной системе обычным образом smile.gif
A.K.
а..если вам не трудно можете выложить программу целиком smile.gif просто я очень плохо паскаль знаю plzzz

А в таком случае "оно тебе надо?"
От того, что мы выложим решение - лучше Паскаль ты знать не будешь, если сам не захочешь... А если захочешь - то тебе уже написали достаточно информации, чтобы решить задачу...
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.