Дана программа на языке Паскаль. Переделать её на язык С++ Var n, i, j, t: integer; Count, Names: array[1..16] of integer; Begin For i := 1 to 16 do begin Count[i] := 0; Names[i] := i; end; ReadLn(N); {Считываем количест...
Дана программа на языке Паскаль. Переделать её на язык С++ Var n, i, j, t: integer;
Count, Names: array[1..16] of integer;
Begin
For i := 1 to 16 do
begin
Count[i] := 0;
Names[i] := i;
end;
ReadLn(N); {
Считываем количество голосов}
for i:=1 to N do
begin
ReadLn(t); {
считали очередную пару}
Count[t] := Count[t] + 1;{
подсчитываем её}
end;
{Сортируем массивы
Names и Count в порядке убывания
значений массива
Count}
for i:=16 downto 2 do
for j:=2 to i do if Count[j-1] 0 then
writeLn(Names[i], ' ', Count[i]);
end.
Гость
Ответ(ы) на вопрос:
ГостьНадоело при копировании из блокнота вручную ставить пробелы. Бред.
Гость#include
using namespace std;
int main()
{
int Count[16],Names[16];
for (int i=0; i<16; i++)
{
Count[i] = 0;
Names[i] = i + 1;
}
int n,t;
cin >> n;
for (int i=1; i<=n; i++)
{
cin >> t;
Count[t] = Count[t] + 1;
}
for (int i=15; i>0; i--)
for (int j=1; j 0)
cout <
Не нашли ответ?
Похожие вопросы