Вівторок, 19.09.2017, 21:41
Головна Реєстрація Вхід
Вітаю Вас, Гість · RSS
Меню сайту
Статистика

Онлайн всього: 1
Гостей: 1
Користувачів: 0
Форма входу
 Кращі розв'язки
Задача A-Ймовірність
Сорока Дмитро
var n,i:longint;
    a,b:Array[0..10001]of longint;
begin
 read(n);
 fillchar(b,sizeof(b),0);
 for i:=1 to n do
  begin
   read(a[i]);
   inc(b[a[i]]);
  end;
 for i:=1 to n do
  begin
   writeln(b[a[i]]/(n-i+1)*100:0:3,' %');
   dec(b[a[i]]);
  end;
end.

Задача A-Ймовірність
Франчук Роман
#include <iostream>
#include <iomanip>
using namespace std;
int r[10001];
int nums[10000];
int main()
{
        int n;
        cin >> n;
        for(int i = 0; i < n; i++)
        {
                cin >> nums[i];
                r[nums[i]]++;
        }
        cout << fixed << setprecision(3);
        for(int i = 0; i < n; i++)
        {
                cout << double(r[nums[i]])/double(n - i)*100.0 << " %\n";
                r[nums[i]]--;
        }
        return 0;
}

Copyright MyCorp © 2017
Пошук
Календар
«  Вересень 2017  »
ПнВтСрЧтПтСбНд
    123
45678910
11121314151617
18192021222324
252627282930
Архів записів
Друзі сайту
Обдаровані діти

Хмельницькі олімпіади

НМЦ ІКТ і ДН

Портал ХОІППО