Режим инкогнито, приватный просмотр — режим браузеров, временно дающий «новое» устройство без истории сёрфинга. Иногда дополнительно усиливается защита информации: например, начинает агрессивнее работать блокировщик трекеров.
Может применяться:
1)для сёрфинга по порно, медицинским и прочим законным, но компрометирующим сайтам, покупки подарков втайне от домочадцев
//t1.txt должен быть в папке с программой //Pascal var f: text; numValue, Counts, n, c, t, i: integer; begin assign(f, 't1.txt'); reset(f); Counts := 0; c := 0; while not eof(f) do begin readln(f, n); if (c = 0) or (n = t) then c := c + 1 else c := 1; t := n; if c > Counts then begin Counts := c; numValue := n end end; close(f); assign(f, 't2.txt'); rewrite(f); writeln('Длина цепочки: ', Counts); for i := 1 to Counts do writeln(f, numValue); close(f) end.
Режим инкогнито, приватный просмотр — режим браузеров, временно дающий «новое» устройство без истории сёрфинга. Иногда дополнительно усиливается защита информации: например, начинает агрессивнее работать блокировщик трекеров.
Может применяться:
1)для сёрфинга по порно, медицинским и прочим законным, но компрометирующим сайтам, покупки подарков втайне от домочадцев
2)для сёрфинга на чужом устройстве
3)для временного частичного снятия пузыря фильтров
4)для ухода от оплаты на некоторых новостных сайтах
5)для отладки сайтов
6)для трансляции экрана
//t1.txt должен быть в папке с программой
//Pascal
var
f: text;
numValue, Counts, n, c, t, i: integer;
begin
assign(f, 't1.txt');
reset(f);
Counts := 0;
c := 0;
while not eof(f) do
begin
readln(f, n);
if (c = 0) or (n = t) then
c := c + 1
else
c := 1;
t := n;
if c > Counts then
begin
Counts := c;
numValue := n
end
end;
close(f);
assign(f, 't2.txt');
rewrite(f);
writeln('Длина цепочки: ', Counts);
for i := 1 to Counts do
writeln(f, numValue);
close(f)
end.