В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
annaorlova2
annaorlova2
08.12.2021 18:51 •  Информатика

НА ПИТОНЕ Перенесите сюда программу с урока из задания "Дуэль" и закончите все пункты. Устройте несколько дуэлей подряд и выведите результаты (Их можно хранить в словаре). В награду за победу персонажу можно увеличивать очки здоровья. Как еще можно разнообразить эту игру? вот код
import time
import random
a1 = random.randint(1,10)
a2 = random.randint(1,10)
player1 = {'Имя' : "Игрок1", 'Здоровье' : 100, 'Атака' : a1}
player2 = {'Имя' : "Игрок2", 'Здоровье' : 100, 'Атака' : a2}
while player1['Здоровье'] > 0 and player2['Здоровье'] > 0:
player2['Здоровье'] -= player1['Атака']
print(player1['Имя'], ' атаковал ', player2['Имя'])
time.sleep(2)
player1['Здоровье'] -= player2['Атака']
print(player2['Имя'], ' атаковал ', player1['Имя'])
time.sleep(2)
print('Игрок1 :', player1['Здоровье'], 'Игрок2 :', player2['Здоровье'])

Показать ответ
Ответ:
Fracian
Fracian
14.02.2021 05:00

#include <iostream>

#include <vector>

#include <map>

using namespace std;

int main(){

   int n;

   cin >> n;

   vector<vector<int>> a(n, vector<int> (n));

   vector<int> x(2*n);

   map<int,int> m;

   for(int i = 0; i < n; i++)

       for(int j = 0; j < n; j++)

           cin >> a[i][j];

   int cur1 = 1, cur2 = 0, elem = 0, cnt = 0;

   for(int i = 0; i < n; i++){

       for(int j = 0; j < n; j++){

           if(i == j){

               x[cur1] = a[i][j];

               cur1 += 2;

               m[a[i][j]]++;

               if(m[a[i][j]] > cnt){

                   cnt = m[a[i][j]];

                   elem = a[i][j];

               }

           }

           if(i + j == n - 1){

               x[cur2] = a[i][j];

               cur2 += 2;

               m[a[i][j]]++;

               if(m[a[i][j]] > cnt){

                   cnt = m[a[i][j]];

                   elem = a[i][j];

               }

           }

       }

   }

   for(auto &i : x) cout << i << " ";

   cout << "\nThe most popular element is : " << elem;

}

0,0(0 оценок)
Ответ:
sfdfgdfgdfg
sfdfgdfgdfg
12.09.2021 00:45
// PascalABC.NET 3.1, сборка 1250 от 28.05.2016
procedure MatInput(a:array[,] of integer);
begin
  Writeln('Вводите элементы матрицы построчно, в конце нажимая Enter');
  for var i:=0 to Length(a,0)-1 do begin
    Write(i+1,': ');
    for var j:=0 to Length(a,1)-1 do Read(a[i,j]);
    end
end;

procedure MatPrint(a:array[,] of integer);
begin
  for var i:=0 to Length(a,0)-1 do begin
    for var j:=0 to Length(a,1)-1 do Print(a[i,j]);
    Writeln
    end
end;

function IsEqual(a:array[,] of integer; j1,j2:integer;
  flag:array of boolean):boolean;
// равны ли столбцы с индексами j1 и j2
begin
  if flag[j2]=False then begin
    Result:=True;
    for var i:=0 to Length(a,0)-1 do
      if a[i,j1]<>a[i,j2] then begin Result:=False; Break end;
    flag[j2]:=Result
    end
end;

begin
  var n:=ReadInteger('Задайте число строк (столбцов) матрицы:');
  var a:array[,] of integer;
  var m:=ArrFill(n,False);
  SetLength(a,n,n);
  MatInput(a);
  Writeln('*** Принятая матрица ***');
  MatPrint(a);
  var k:=1;
  for var i:=0 to n-2 do
    for var j:=i+1 to n-1 do
      if IsEqual(a,i,j,m) then Inc(k);
  if k>1 then Writeln('Количество совпадающих столбцов равно ',k)
  else Writeln('нет совпадающих столбцов')
end.

Тестовое решение
Задайте число строк (столбцов) матрицы: 3
Вводите элементы матрицы построчно, в конце нажимая Enter
1: 1 2 2
2: 3 5 5
3: 2 2 2
*** Принятая матрица ***
1 2 2
3 5 5
2 2 2
Количество совпадающих столбцов равно 2
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота