B. очистка данных ограничение времени: 1.0 секунды ограничение памяти: 64 мб прежде чем применить к данным методы машинного обучения, проводится процесс очистки данных. необходимость очистки связана с тем, что в данных могут быть аномальные элементы: дубли, ошибки ввода и выбросы. если очистка данных не будет выполнена, то методы анализа данных могут дать неправильный результат! рассмотрим интеллектуальную систему предсказания погоды. такая система постоянно получает данные о текущей температуре воздуха с множества метеостанций. каждая метеостанция передает последовательно данные о температуре в виде пары целых чисел. первое число – это время, которое измеряется количеством секунд с начала суток. второе число – это температура в градусах цельсия. очистка данных производится в три этапа. сначала удаляются дубли – когда информация об одном и том же времени измерения и той же температуре воздуха повторилась несколько раз подряд (первый элемент в такой последовательности одинаковых данных дублем не считается после удаления дублей из последовательности удаляются ошибки ввода времени - когда время в новой паре не превосходит время в предыдущей паре или превышает количество секунд в сутках. на третьем этапе из последовательности удаляются выбросы – пары с аномальным значением температуры, когда измеренная температура по модулю больше 40 градусов или отличается от предыдущего значения более чем на 10 градусов. вам нужно написать программу, которая будет определять в исходной последовательности данных количество удаляемых дублей, выбросов и ошибок. можете считать, что самая первая пара в последовательности не относится к аномальным. исходные данные в первой строке входных данных записано целое число n – количество измерений (1 ≤ n ≤103). в следующих n строках записаны целые числа t и t, разделенные пробелом – время измерения и значение температуры воздуха. все числа по модулю не превосходят 109. результат выведите три целых числа, разделенных пробелами – количество дублей, ошибок ввода времени и выбросов в последовательности исходных данных. пример исходные данные результат 6 10 5 8 5 8 5 8 5 12 25 13 10 2 1 1 замечания 8 5 дублируется трижды. после удаления двух копий остается одна пара 8 5, которая является ошибкой ввода (т.к. время 8 меньше 10 из предыдущей пары). после ее удаления остается последовательность из трех пар 10 5, 12 25, 13 10, в которой 12 25 – выброс (t = 25 более чем на 10 превышает 5). после удаления выброса остается очищенная последовательность 10 5, 13 10 в этой есть тесты, в которых присутствуют только дубли (суммарно 20 ), ошибки ввода (также 20 ) и выбросы (еще 20 ). оставшиеся тесты включают разные типы аномальных элементов (40 ).
Ответы
По выполняемым функциям и возможности применения информационные технологии делят на используемые:1) в автономных компьютерах (ПЭВМ) и в локальных рабочих станциях (АРМ) в составе сетевых автоматизированных информационных систем (АИС) реального времени;2) в объектно-ориентированных, распределённых, корпоративных и иных локальных и сетевых информационно-поисковых, гипертекстовых и мультимедийных системах;3) в системах с искусственным интеллектом;4) в интегрированных АИС;5) в геоинформационных, глобальных и других системах.
Выполняя алгоритм, получаем следующий результат (15 итераций)
1. 0..65534 -> 32767
2. 0..32766 -> 16383
3. 0..16382 -> 8191
4. 0..8190 -> 4095
5. 0..4094 -> 2047
6. 2048..4094 -> 3071
7. 2048..3070 -> 2559
8. 2560..3070 -> 2815
9. 2816..3070 -> 2943
10. 2944..3070 -> 3007
11. 2944..3006 -> 2975
12. 2976..3006 -> 2991
13. 2992..3006 -> 2999
14. 3000..3006 -> 3003
15. 3000..3002 -> 3001
Если лень перебирать вручную, можно воспользоваться программой
var k,l,r,x,f:integer;
begin
f := 3001;
l := 0;
r := 65534;
x := (l + r) div 2;
k := 1;
while (x <> f) and (l < r) do
begin
writeln(k,' ',l,' ',r,' ',x);
k := k + 1;
if f < x then r := x - 1
else l := x + 1;
x := (l + r) div 2
end;
writeln(k,' ',l,' ',r,' ',x);
end.
1. 0..65534 -> 32767
2. 0..32766 -> 16383
3. 0..16382 -> 8191
4. 0..8190 -> 4095
5. 0..4094 -> 2047
6. 2048..4094 -> 3071
7. 2048..3070 -> 2559
8. 2560..3070 -> 2815
9. 2816..3070 -> 2943
10. 2944..3070 -> 3007
11. 2944..3006 -> 2975
12. 2976..3006 -> 2991
13. 2992..3006 -> 2999
14. 3000..3006 -> 3003
15. 3000..3002 -> 3001
Если лень перебирать вручную, можно воспользоваться программой
var k,l,r,x,f:integer;
begin
f := 3001;
l := 0;
r := 65534;
x := (l + r) div 2;
k := 1;
while (x <> f) and (l < r) do
begin
writeln(k,' ',l,' ',r,' ',x);
k := k + 1;
if f < x then r := x - 1
else l := x + 1;
x := (l + r) div 2
end;
writeln(k,' ',l,' ',r,' ',x);
end.
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
Представлення типів даних в ПК
Автор: phiskill559
Створки программу побудову зірки згідно зрачка у программ
Автор: blagorodovaanna375
Как взломать нитро в дискорд?Есть ли платная услуга от хакера по взлому нитро?
Автор: layna1241383
Изобразите схемы трёх логических элементов и подпишите (напишите название) каждый из них.
Автор: Анатольевич-Фатима
Что такое виджеты и для каких целей они используются
Автор: MN-Natusik80
Составьте программу для вычисления значения функции.
Автор: ЮлияДаниил520
Составить алгоритм запуска Paint в OC Windows 7 в виде блок схемы Жду)
Автор: Solovetzmila
begin
var n := ReadInteger;
var L := new List<(integer, integer)>;
loop n do
begin
L.Add(ReadInteger2)
end;
var k := L.Count;
L := L.Distinct.ToList; // этап 1
var k1 := L.Count;
Print(k - k1);
(k, k1) := (k1, 0); // этап 2
var St := new Stack<integer>;
var m := L.First[0]; // время
for var i := 1 to k - 1 do
if L[i][0] <= m then
begin
St.Push(i);
Inc(k1)
end
else m := L[i][0];
for var i := 1 to k1 do
L.RemoveAt(St.Pop);
Print(k1);
(k, k1) := (L.Count, 0); // этап 3
m := L.First[1]; // температура
for var i := 1 to k - 1 do
if Abs(L[i][1] - m) > 10 then
begin
St.Push(i);
Inc(k1)
end
else m := L[i][1];
for var i := 1 to k1 do
L.RemoveAt(St.Pop);
Println(k1);
end.
Пример610 58 58 58 512 2513 102 1 1