Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
DasyaSay
27.07.2022 13:44 •
Информатика
Проверить истинное высказывание "ровно одно из чисел a и b нечётное". программа в pascal
Ответ:
linakkj
10.10.2020 00:41
var a, b: integer;
begin
Read(a, b);
Write(Odd(a) xor Odd(b))
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
sebtetfGек5у
24.04.2021 19:37
Сколько раз будет выполнен цикл for n: = 1to48do?...
moskaliov
09.02.2021 02:51
Pascal Дано вещественное число X и целое число N ( 0). Найти значение выражения (n слагаемых)...
trunczova84
08.07.2021 19:26
Ваш новый пароль должен быть длиной от 8 до 64 знаков и содержать буквы верхнего и нижнего регистров, а также цифры. ПРИДУМАЙТЕ БИСТРА...
SOSmi
17.04.2020 22:47
Задали узнать как исправить ошибку isdone.dll -5 не хватает памяти, к слову памяти хватает....
partypoison6
14.11.2021 01:59
Отметьте все браузеры 1. Microsoft word 2. Internet explorer 3. Maicosoft outlook 4. Opera 5. Mozilla firefox...
798210374
14.10.2022 08:05
Программирование линейных и разветвляющихся алгоритмов Дамир составил код для вычисления значения Выбери правильный вариант. y=(math.pow(x,4)+x)/(math.pow(x,2)-x-2)/((math.pow(x,2)-x-2)...
jessyss
26.08.2021 07:11
Введите два числа .Если одно число больше второго, то число первое увеличить на 2,если меньше второго - то числа сложить. Результат вывести на экран....
Snomeli
24.10.2022 07:18
Решите алгоритм a:= 2 k:=4 a:=k+a*3 k:=a/2-k Объясните своё решение...
fedia24
06.10.2021 01:21
Write a review of a bock of film that you have seen...
sanya811
18.02.2022 19:39
? 3. Как сделать так чтобы было 47 7. Равенство...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var a, b: integer;
begin
Read(a, b);
Write(Odd(a) xor Odd(b))
end.