logo
Войти Регистрация Спроси ai-bota


mahvash
11.07.2022 15:15

Проверить истинное высказывание "ровно одно из чисел a и b нечётное". программа в pascal

Нажмите на рекламу ниже и сразу увидите ответ
↓
Популярные вопросы:
Финн2014
Финн2014
19.02.2020 07:43
Составить блок-схему увеличения большего из двух чисел на 1...
4кл2
4кл2
01.05.2023 14:17
Написать программу : дано все 3-х значные числа найти сумму и количество чисел которые кратны 9....
Regina13579
Regina13579
19.07.2022 17:38
Сколько секунд потребуется модему, информацию со скоростью 19200 бит/с, чтобы передать цветное растровое изображение размером 1024 х 768 пикселов, при условии, что...
fooox30
fooox30
23.05.2020 14:07
Информационный об ем статьи, набранной на компьютере составляет 48 кбайт. определите сколько страниц содержит статья, если известно, что на каждой странице 48 строк,...
Губанова1234
Губанова1234
13.03.2020 03:33
Утрёх маляров есть брат иван, а у ивана братьев нет.может так быть и почему?...
avdzhrr
avdzhrr
08.01.2020 15:16
Прикладное программное обеспечение – это: 1) набор игровых программ; 2) справочное приложение к программам; 3) текстовый и графический редакторы, обучающие и тестирующие...
Rita53
Rita53
10.06.2022 15:36
Элементы двухмерного массива a размером nxn первоначально были равны 1000. затем значения некоторых из них меняют с следующего фрагмента программы: k : = 0; for i:...
Ivan251109
Ivan251109
10.06.2022 15:36
Вычислить энтропию опыта, состоящего в определении цвета наугад вынутого шарика, если в непрозрачном мешочке хранятся 35 белых, 25 красных, 15 синих и 45 зеленых шариков....
slavachekunov
slavachekunov
10.06.2022 15:36
Вкорзине лежат белые и черные шары. сообщение о том, что достали черный шар, несет на 2 бита больше информации, чем сообщение о том, что достали белый шар. определите,...
Iamboss11111
Iamboss11111
10.06.2022 15:36
Заполните массив случайными числами и найти минимальный и максимальный элементы массива и их номера. пример: массив: 1 2 3 4 5 минимальный элемент: a[1]=1 максимальный...
Ответ:
lamsjsj
10.10.2020 00:41

var a, b: integer;

begin

 Read(a, b);

 Write(Odd(a) xor Odd(b))

end.

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
О НАС
СООБЩЕСТВО
ПОМОЩЬ
App
.
.
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота