1. Внутреннюю — оперативную и внеш¬нюю — долговременную 2. Управление устройствами и задачами 3. Красный, зеленый, синий 4. Целые числа в памяти компьюте¬ра это: Дискретное и конечное множество 5. Контроллер 6. Передача данных, передача адресов
7. D
8. Прикладные программы общего назначения и специализированные программы 9. Главная формула информатики? 2i = N 16i = N 2f = Z 2i = M
10. Прикладные программы и системные программы
11. К основным типам устройств оперативной памяти относятся? Динамическая и статическая память 12. Компьютер 13. Какой универсальный звуко¬вой формат файлов используется для сохранения звука без потерь? WAV
14. Множество целых чисел в компьютере дискретно, конечно, ограничено
15. В памяти компьютера числа хранятся? В двоичной сис¬теме счисления
var soldier: array[1..5000]of integer; n, i, j, k, max, t, d, imax, a, c: integer;
begin if auto then begin n := random(5000); for i := 1 to n do soldier[i] := random(5000); end else begin readln(n); for i := 1 to n do read(soldier[i]); end;
{сортирововчка} for i := 1 to n - 1 do begin imax := i; for j := i + 1 to n do if soldier[j] > soldier[imax] then imax := j; max := soldier[i]; soldier[i] := soldier[imax]; soldier[imax] := max; end;
max := 0; for i := 1 to n - 1 do for j := i + 1 to n do begin a := soldier[j]; d := soldier[j] - soldier[i]; c := 2; for k := j + 1 to n do if soldier[k] = a + d then begin a := soldier[k]; c := c + 1; end; if c > max then max := c; end;
