Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
srs777s
03.12.2022 23:50 •
Информатика
Только 4. язык программирования - паскаль
Ответ:
VaNyOkToP
29.05.2020 14:35
var
A, B: integer;
begin
read(A, B);
A := A xor B;
B := B xor A;
A := A xor B;
write(A, ' ', B);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
сева167
27.03.2020 07:55
Программное обеспечение предназначенное для работы с базами данных называется? А-реляционной базой данных Б-информационной системой В-база данных Г-системой управления...
Rian1338
05.04.2022 17:21
К основным логическим операциям относятся? Выберите один или несколько ответов : А-дизьюнкция Б-коньюкция В-эквиваленция Г-инверсия...
bratunivanovth9i
13.10.2021 02:24
Скласти програму обчисления суми чисел 1/3+1/6+1/9+...+1/n...
Nodukam
10.07.2022 15:25
Сообщение по теме модели в разных областях науки...
olyarogova
21.10.2021 15:59
Составить программы вычесления суммы чисел 7 до 700 кратных 14...
arturka111
29.06.2021 22:56
Составить программу вычисления произведения чисел от 1 до 500 кратных 13...
manonako1
20.03.2023 13:44
Составьте блок схему: program qq; var a, b, c: integer; begin writeln ( введите два числа ); readln(a,b); while a b do begin if a b then a: =a-b else b: =b-a; end;...
полмвзсгдчэлжпчхмэвп
20.03.2023 13:44
Решить с массивом. прочитать 8 симолов, напечатать, если ли среди них символ «звездочка»...
skillvip
28.04.2021 17:14
Какого типа должны быть параметр цикла, его начальное и конечное значения в цикле с параметром в языке Pascal?...
svetik1310
29.10.2022 06:31
Сделать в python или ms visual basic, умоляю...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var
A, B: integer;
begin
read(A, B);
A := A xor B;
B := B xor A;
A := A xor B;
write(A, ' ', B);
end.