Процессы,использующие совокупность средств и методов сбора,обработки и передача данных (первичной информации) для получения информации нового качества о состояние объекта,процесса и явления (информационного продукта),это..

108

332

Посмотреть ответы 2

Ответы на вопрос:

Dogi2008

Информатика

4,5(48 оценок)

Информационные технологии

Mihael13

Информатика

4,4(2 оценок)

Const n = 20; var a: array[1..n] of integer; b: array[-5..11] of integer; i, j, m: integer; begin //заполнение массива и подсчет кол-ва каждого из интервала // от -5 до 11 writeln('исходный массив'); for i : = 1 to n do begin a[i] : = random(17) - 5; inc(b[a[i]]); write(a[i]: 4); end; writeln; //сортировка и вывод массива writeln('отсортированный массив'); for i : = 1 to n - 1 do begin for j : = i + 1 to n do begin if a[i] > a[j] then begin m : = a[i]; a[i] : = a[j]; a[j] : = m; end; end; end; for i : = 1 to n do write(a[i]: 4); writeln; //вывод количества чисел из интервала for i : = -5 to 11 do begin writeln('число: ', i: 4, ' кол-во: ', b[i]: 4); end; end. тестовое решение: исходный массив 9 4 6 1 8 -5 9 0 -1 0 7 7 -1 -3 -1 -2 7 3 11 4 отсортированный массив -5 -3 -2 -1 -1 -1 0 0 1 3 4 4 6 7 7 7 8 9 9 11 число: -5 кол-во: 1 число: -4 кол-во: 0 число: -3 кол-во: 1 число: -2 кол-во: 1 число: -1 кол-во: 3 число: 0 кол-во: 2 число: 1 кол-во: 1 число: 2 кол-во: 0 число: 3 кол-во: 1 число: 4 кол-во: 2 число: 5 кол-во: 0 число: 6 кол-во: 1 число: 7 кол-во: 3 число: 8 кол-во: 1 число: 9 кол-во: 2 число: 10 кол-во: 0 число: 11 кол-во: 1