// PascalABC.NET 3.3
// Cборка 1590 от 03.12.2017
begin
var (a,b):=ReadInteger2(Введите a и b->);
var (c,d):=ReadInteger2(Введите c и d->);
swap(a,d); swap(c,b); swap(a,b);
Println(a,b,c,d);
end.
Пример:
Введите a и b-> 1 2
Введите c и d-> 3 4
Результат: 3 4 2 1
Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.