С++:Квадратная матрица и шахматная проблема..

[Andres]

Поздравляю всех с наступившим 2008 годом!
прошу помочь разобраться со следущим заданием:
Дано: квадратная матрица A[N][N] - таблица результатов некоторого шахматного турнира, в котором участвовало N шахматистов(N>2).
A[i,j]=B, если i-ый выиграл у j-го(при этом A[j,i]=П),
A[i,j] =Н, если i-ый и j-ый участники сыграли вничью, и A[i,j]=Х.За выигрыш дается 1 очко, за ничью 0,5 очка, за поражение - 0.
Распечатать номера участников в порядке не возрастания набранных ими очков. Подсчет очков одного участника оформить как функцию.

Заранее благодарен.

[Goblin]

Я сам новичек в программирование.
Посмотри может подойдет?

#include <iostream>
#include <cstdlib>
using namespace std;
const int N = 3;

int main()
{
	double n[N] = {0,0,0};
	double a[N][N] = {{0, 1.0, 0.5},{0, 0, 0.5},{0, 0.5, 0}};

	for(int i = 0; i<N; i++)
	{
		for(int j = 0; j<N; j++)
		{
			n[i] += a[i][j];
		}
	}
	cout << "N1 " << n[0] << endl
	     << "N2 " << n[1] << endl
	     << "N3 " << n[2] << endl;

	system("PAUSE");
	return 0;
}

Если нужно осортировать массив вот хеадер:
sort_m.zip

[puporev]

Поскольку язык сей не знаю, могу объяснить ход решения, если нужно, на "пальцах" или на Паскале.

[Goblin]

Поскольку язык сей не знаю, могу объяснить ход решения, если нужно, на "пальцах" или на Паскале.

Если не трудно - давай!

[puporev]

По-русски долго объяснять, поэтому на Паскале. Код рабочий, если только при перепечатке какой-нибудь ляп не залез.

const n=8;
type matr=array[1..n,1..n]of char;
     rez=record          // Запись нужна для связи количества 
         nomer:integer;  // очков с номером игрока в таблице.
         ochki:real;
         end;
var a:matr;
    i,j,x:integer;
    Itog:array[1..n] of rez;//массив записей
    y:rez;                  //буфер для сортировки   
function Ochki(a:matr):real;//функция для подсчета очков
var k:real;
begin
   k:=0;
   for j:=1 to n do
      begin
         if a[i,j]='В'then k:=k+1;
         if a[i,j]='Н'then k:=k+0.5;
      end;
   Ochki:=k;
end;
begin
randomize;
for i:=1 to n do
   begin
      for j:=1 to n do
         begin
           if i=j then a[i,j]:='X';//главная диагональ
           if j>i then    //выше главной диаглнали
             begin
               x:=random(3);//заполняем случайным образом
               case x of
               0:a[i,j]:='П';
               1:a[i,j]:='Н';
               2:a[i,j]:='В';
               end;
             end;
        end;
   end;
for i:=1 to n do
   begin
      for j:=1 to n do
         begin
           if i>j then   //ниже главной диагонали
             begin
               case a[j,i] of
               'П':a[i,j]:='В';
               'Н':a[i,j]:='Н';
               'В':a[i,j]:='П';
               end;
             end;
         end;
   end;
for i:=1 to n do       //выведем матрицу на экран
   begin
      for j:=1 to n do
         begin
           write(a[i,j],' ');
         end;
      writeln;
   end;
readln;
for i:=1 to n do      
   begin
     Itog[i].ochki:=Ochki(a); //считаем количество очков по строкам
     Itog[i].nomer:=i;        //привязываем их к номеру строки
   end;
for i:=1 to n-1 do
for j:=1 to n-1 do
if Itog[j].ochki<Itog[j+1].ochki then //сортируем очки по невозрастаниюнию
   begin
      y:=Itog[j];Itog[j]:=Itog[j+1];Itog[j+1]:=y;
   end;
for i:=1 to n do            //выводим на экран номера игроков и их очки
writeln(Itog[i].nomer,' ',Itog[i].ochki:2:1);//в соответствии с занятым                   
readln                                     //местом
end.
Можно украсить и вывести сначала занятое место, затем номер и очки.
writeln(i,' место ',Itog[i].nomer,' ',Itog[i].ochki:2:1);

[Goblin]

С паскалем едва знаком.
Напиши на русском, хотябы в общих чертах; или добавь побольше коментариев в свой исходник.

[Andres]

Сообщение от Goblin

Я сам новичек в программирование.
Посмотри может подойдет?

спасибо почти идет только вот:include\ios(9) : fatal error C1083: Cannot open include file: 'streambuf': No such file or directory
1 ошибочка, посмотри пожалуйста как исправить можно, без ошибок уж разберусь с программой.

[puporev]

Максимально подробно.

const n=8;//константа, размерность матрицы
type matr=array[1..n,1..n]of char; тип-матрица, заполненная символами
     rez=record          // тип-запись нужна для связи количества 
         nomer:integer;  // очков с номером игрока в таблице.
         ochki:real;       //nomer и ochki - поля записи
         end;
var a:matr;   //переменная - матрица
    i,j,x:integer;   //численные переменные (i,j- счетчики, х-вспомогательная переменная)
    Itog:array[1..n] of rez;//массив записей, т.е. сведения о номерах и очках восьми человек
    y:rez;                  //буфер для сортировки   
function Ochki(a:matr):real;//функция для подсчета очков
var k:real; //счетчик очков
begin
   k:=0;
   for j:=1 to n do   //цикл
      begin
         if a[i,j]='В'then k:=k+1;//выигрыш +1 очко
         if a[i,j]='Н'then k:=k+0.5;//ничья +0,5 очка
      end;
   Ochki:=k;//общая сумма очков
end;
begin //начало программы
randomize; //процедура генерирования случайных чисел
for i:=1 to n do //внешний цикл
   begin
      for j:=1 to n do   //вложенный цикл
         begin
           if i=j then a[i,j]:='X';//на главной диагонали знак Х  //если i=j то Х
           if j>i then    //выше главной диагонали     //если j>i то цикл    
             begin
               x:=random(3);//заполняем случайным образом
               case x of       //оператор выбора
               0:a[i,j]:='П';    //если 0 то П
               1:a[i,j]:='Н';    //если 1 то Н
               2:a[i,j]:='В';    //если 2 то В
               end;
             end;
        end;
   end;
for i:=1 to n do    
   begin
      for j:=1 to n do
         begin
           if i>j then   //ниже главной диагонали
             begin
               case a[j,i] of
               'П':a[i,j]:='В';
               'Н':a[i,j]:='Н';
               'В':a[i,j]:='П';
               end;
             end;
         end;
   end;
for i:=1 to n do       //выведем матрицу на экран
   begin
      for j:=1 to n do
         begin
           write(a[i,j],' ');  //вывести значения матрицы в строку
         end;
      writeln;   //начать с новой строки
   end;
readln;      //прочитать, сделать задержку
for i:=1 to n do      
   begin
     Itog[i].ochki:=Ochki(a); //считаем количество очков по строкам
     Itog[i].nomer:=i;        //привязываем их к номеру строки
   end;
for i:=1 to n-1 do
for j:=1 to n-1 do
if Itog[j].ochki<Itog[j+1].ochki then //сортируем очки по невозрастаниюнию
   begin
      y:=Itog[j];Itog[j]:=Itog[j+1];Itog[j+1]:=y;   //сортировка методом "пузырька"
   end;
for i:=1 to n do            //выводим на экран номера игроков и их очки столбиком
writeln(Itog[i].nomer,' ',Itog[i].ochki:2:1);//в соответствии с занятым                   
readln                                     //местом
end.
Можно украсить и вывести сначала занятое место, затем номер и очки.
writeln(i,' место ',Itog[i].nomer,' ',Itog[i].ochki:2:1);