Конечно, вот пример простой реализации игры "Цзяньшицзы" на PascalABC.NET:

program JiangshiCzi;
var
playerChoice, computerChoice: Integer;
begin
Randomize;
writeln('Добро пожаловать в игру "Цзяньшицзы"!');
writeln('1 - камень, 2 - ножницы, 3 - бумага');
repeat
write('Сделайте свой выбор: ');
readln(playerChoice);
until (playerChoice >= 1) and (playerChoice <= 3);
computerChoice := Random(3) + 1;
writeln('Компьютер выбрал: ', computerChoice);
if playerChoice = computerChoice then
writeln('Ничья!')
else if (playerChoice = 1) and (computerChoice = 2) or
(playerChoice = 2) and (computerChoice = 3) or
(playerChoice = 3) and (computerChoice = 1) then
writeln('Вы победили!')
else
writeln('Компьютер победил!');
end.

Просто скопируйте этот код в среду PascalABC.NET и запустите программу, чтобы начать игру. Удачи!