IPB
ЛогинПароль:

> Внимание!

1. Пользуйтесь тегами кода. - [code] ... [/code]
2. Точно указывайте язык, название и версию компилятора (интерпретатора).
3. Название темы должно быть информативным.
В описании темы указываем язык!!!

Наладить общение поможет, если вы подпишитесь по почте на новые темы в этом форуме.

> Массивы, С
сообщение
Сообщение #1


Пионер
**

Группа: Пользователи
Сообщений: 114
Пол: Мужской
Реальное имя: Ден

Репутация: -  0  +


Задание :
-------------------
Даны итоги выборов в Думу города. По К округам известно число голосовавших за представителей М партий. Считая, что от каждого округа в Думу проходит по одному представителю, составить алгоритм и программу, которые определяют, какая партия провела наибольшее число своих кандидатов (предполагая, что все кандидаты набрали разное число голосов).
------------------------------------
Это задачу мне надо переделать из Паскаля в Си, но возникают ошибки..

Вот задача в Паскале :

Program z;
const
K=5;
M=4;
Results: array[1..K,1..M] of integer=
(
(2,1,3,4),
(7,1,5,2),
(4,1,2,5),
(8,1,8,8),
(2,1,6,3)
);
Var
Party: array[1..M] of integer;
i,j:integer;
maxParty,Posmax:integer;
begin
for i:=1 to K do begin
Posmax:=1;
for j:=2 to M do
if Results[i,j]>Results[i,Posmax]
then Posmax:=j;
Inc(Party[Posmax]);
end;
maxParty:=1;
for i:=2 to M do
if Party[i]>Party[maxParty]
then maxParty:=i;
writeln('Party#', maxParty);
readln;
end.



А вот попытка сделать её в Си :


#include <stdio.h>
#include <conio.h>
#include <iostream.h>
int main()
{
const int K=5;
const int M=4;
int Results[0..K][0..M]={ {2,1,3,4},
{7,1,5,2),
{4,1,2,5},
{8,1,8,8},
{2,1,6,3}
};
int Party[M];
int i,j;
int maxParty,Posmax;
for(i=1; i<K; i++)
Posmax=1;
for(j=2; j<M; j++)
{
if( Results[i][j]> Results[i,Posmax])
Posmax=j;
Party[Posmax]++;
}
maxParty=1;
for(i=2; i<M; i++)
{ if( Party[i]>Party[maxParty])
maxParty=i;

}

cout<<"Party#"<<maxParty<<endl;

return 0;
}


--------------------
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

Сообщений в этой теме


 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 





- Текстовая версия 23.09.2020 1:01
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name