Вопрос по информатике:
С клавиатуры вводятся два символа. Определить четная ли сумма их кодов?( паскаль)
Пожаловаться
- 07.01.2015 07:43
- Информатика
- remove_red_eye 12661
- thumb_up 24
Ответы и объяснения 1
Var c1,c2:char;
begin
readln(c1,c2);
if odd(ord(c1)+ord(c2))
then writeln('Сумма кодов нечётна')
else writeln('Сумма кодов чётна');
end.
Пример:
AB
Сумма кодов нечётна
begin
readln(c1,c2);
if odd(ord(c1)+ord(c2))
then writeln('Сумма кодов нечётна')
else writeln('Сумма кодов чётна');
end.
Пример:
AB
Сумма кодов нечётна
Пожаловаться
- 08.01.2015 22:34
- thumb_up 36
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы
Интересные вопросы