Задание: создать игру "Цзяньшицзы" на PascalABC.NE
Не поможете? Напишите код?

Предыдущий
вопрос Следующий
вопрос

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

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

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