Прошу:)
var a, b, c, d: integer;
begin
readln(d);
a := d div 100;
b := d mod 100 div 10;
c := d mod 10;
writeln(b, c, a);
<span>end.
можно ещё сократить:
var a, b, c, d: integer;
begin
readln(d);
writeln(d mod 100 div 10, d mod 10, d div 100);
<span>end.
или даже:
var a, b, c, d: integer;
begin
readln(d);
a := d div 100;
writeln(d - a * 100, a);
<span>end.</span></span></span>
Воможно ты имел ввиду переход между окнами, тогда комбинация Win+Tab или Alt+Tab. Версии Windows, которые поддерживают эту функцию: 7, 8, 8.1, 10.