Напишите игру Rock, paper, scissors, lizard, Spock, основываясь на коде, приведенном в уроке.
Дополните код созданной игры так, чтобы
пользователю было предложено сделать выбор не из
трех, а из пяти вариантов:
1
[s] - scissors
[p] - paper
[r] - rock
[l] - lizard
[o] - spock
Дополнительно выполните такие задания:
1. Реализуйте программу таким образом, чтобы
пользователь мог повторить игру столько раз, сколько
захочет. Выведите сообщение типа Try again? и
варианты ответа: Yes ([y]) и No ([n]).
2. По завершению игры выведите общий счет
(Player VS Computer).
143
338
Ответы на вопрос:
// pascal var a: array [1..16] of integer; i: integer; b: boolean; begin randomize; for i : = 1 to 16 do a[i] : = random(-20, 20); for i : = 1 to 16 do if a[i] = 0 then begin if b then write(', '); write(i, '-й '); b : = true; end; if b then writeln('элемент(ы) равен(ны) нулю') else writeln('в массиве нету элементов, равных нулю.'); end.
Популярно: Информатика
-
thebrianmaps200021.07.2022 13:50
-
VovanHovan04.02.2023 09:51
-
rekardo13.07.2022 02:22
-
БейшеналиеваГ07.10.2021 00:52
-
nigaic02.08.2022 10:51
-
mandarinka300106.06.2023 17:11
-
dilayra1622.08.2022 04:58
-
romanenkoanna6622.07.2020 00:58
-
mary30926.06.2021 19:28
-
Vladislav52524526405.11.2022 19:26