Во время ВОВ сложные технические и криптографические средства зашиты информации стали во многом ключевыми, ведь ценность информации возросла кратно. К июню 1941, когда немецкие армии вторглись на территорию СССР, наша система защиты государственной тайны была практически полностью сформирована. Она успешно выполняла целый ряд поставленных перед ней задач. От любых иностранных разведок надежно защищались все информационные ресурсы: мобилизационные, технические, военные, политические, идеологические и природные.
Var n, k, t, i, counter, j: int64; c: array[1..10]of int64; a: array[1..100000]of int64; ar: array[1..10, 1..100000]of int64; count: array[1..10]of int64; b: boolean;
label l1;
begin b := true; counter := 0; read(n, k, t); for i := 1 to n do read(c[i]); for i := 1 to k do read(a[i]); l1: while (counter <> k) do begin for j := 1 to n do begin for i := 1 to c[j] do begin if(ar[j, i] <= a[counter + 1]) then begin ar[j, i] := t + a[counter + 1]; counter := counter + 1; count[j] := count[j] + 1; b := false; goto l1; end; end; end; if(b = true) then counter := counter + 1; b := true; end; for i := 1 to n do write(count[i], ' '); end.
program jnrvjf; var A: array[0..20] of integer; x, b, i, d, c: integer; begin writeln('Введите число элементов в массиве'); readln(d); writeln('Введите число');; readln(x); b:=0; for i:= 1 to d do A[i] := random (20); writeln(A); for i:= 1 to d do begin c:= A[i]; if (c > b) then b:=A[i] end; writeln('Максимальное значение в множестве: ', b); for i:=0 to d do begin b:=A[i]; if b = x then writeln ('Номера элементов, совпадающих с x: ', i)// Это если вести человеческую нумерацию, где первый элемент имеет номер 1. end; end.
Во время ВОВ сложные технические и криптографические средства зашиты информации стали во многом ключевыми, ведь ценность информации возросла кратно. К июню 1941, когда немецкие армии вторглись на территорию СССР, наша система защиты государственной тайны была практически полностью сформирована. Она успешно выполняла целый ряд поставленных перед ней задач. От любых иностранных разведок надежно защищались все информационные ресурсы: мобилизационные, технические, военные, политические, идеологические и природные.