Твоему младшему брату приобрели личный компьютер, а тебя попросили настроить безопасность устройства. какие действия ты выполнишь? установить антивирусную программу включить брендмауэр создать отдельную учетную запись для брата в операционной системе подключить через провайдера функцию «родительский контроль» включить бекап диска включить в браузере режим безопасного поиска

Линукс ему поставить без рута с бекапом \user. + что нибуть из цензоров, но всё же это если ему меньше 10 летю

//pascal abc.net v3.1 сборка 1172 const   n=5; var   ar1,ar2: array[1..n] of integer;   i,k,m: integer; begin   writeln('reading array a: ');   for i: =1 to n do   readln(ar1[i]);   writeln('reading array b: ');   for i: =1 to n do   readln(ar2[i]);   writeln('res: ');   for i: =1 to n do     if ar1[i]> 5 then       begin         writeln(i);         break;       end;   for i: =1 to n do     if odd(ar2[i]) then       begin         writeln(ar2[i]);         break;       end; end. пример ввода: array a: 1 2 4 5 9 array b: 1 4 7 9 13 пример вывода: res: 5 1

1. вот так учат писать в // pascalabc.net 3.1, сборка 1179 от 29.02.2016 const   n=10; var   a: array[1..n] of integer;   i: integer; begin   randomize;   for i: =1 to n do begin       a[i]: =i;       write(a[i],' ')       end;   writeln; end. результат выполнения программы 1 2 3 4 5 6 7 8 9 10 2. а вот так пишут "в жизни" // pascalabc.net 3.1, сборка 1179 от 29.02.2016 begin   var a: =range(1,10).toarray;   a.println end.