Напишите программу, которая инвертирует определенный бит в заданном числе (биты при этом нумеруются с 0, начиная с младших).

var  n,k:integer;begin  Write('Укажите число и номер инвертируемого бита: ');  Read(n,k);  Writeln('Результат: ',n xor (1 shl k))end.Тестовое решение:Укажите число и номер инвертируемого бита: 573 4Результат: 557