План 1. Перевірити стан захищеності свого ПК/ смартф/ планшету. Описати, до 10 речень.
2. Визначити антивіруси своїх гаджетів, запустити сканування, зробити фото процесу сканування. Описати, до 10 речень.
3. Які місця у вас є вразливі? Описати, до 10 речень.
4. Що потрібно зробити, щоб виправити ці недоліки? Описати, до 10 речень.
5. План ваших дій при вірусній атаці на ваш пристрій. Описати, до 10 речень.
6. Які безкоштовні антивір прогр можна встановити на ваш пк? 10 прогр
7. Які допоміжні утиліти встановити для захисту ваших даних? Описати, до 10 речень.
8. Зробити фото процесу викон практ роб і фінішу та відправ у вайбер особисто.

👇

Увидеть ответ

Открыть все ответы

Ответ:

jumadillaeva

17.12.2021

Вычитаем первое число из второго.

Если результат отрицательный, то первое меньше второго.

Если нулевой, то они равны.

Если положительный, то первое больше второго.

Найдем разность между первым и вторым значением: c=a-b

Все что нам требуется сделать, это выяснить, является ли с положительным числом.

Например, используя функцию сигнум, можно получить вариант функции Хевисайда, которая будет принимать значение 1 только для положительных значений, а во всех остальных случаях обращаться в ноль. f(c)=[(sgn(c)+1/)2]

В нашем случае можно записать, что max(a,b)=a*f(c)+b*f(-c)

Так мы можем сравнить два числа, не прибегая к логическому сравнению.

Конечно, данный алгоритм реализуем при условии наличия встроенной функции сигнум (она присутствует даже в старом Бейсике ). Но даже если такой встроенной функции нет, ее написание не составит большого труда.

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

Ответ:

Nastya1771

17.12.2021

// PascalABC.NET 3.3, сборка 1627 от 27.01.2018
// Внимание! Если программа не работает, обновите версию!

№6

begin
var a:=ArrRandom(ReadInteger('n='),-99,99).Println;
Writeln('[',a.Min,';',a.Max,']')
end.

Пример
n= 13
72 -77 -88 -99 -2 -61 67 40 -30 -28 91 -56 29
[-99;91]

№9

begin
var a:=ReadArrReal('Вводите:',ReadInteger('n='));
Writeln('Положительных: ',a.Where(t->t>0).Count);
Writeln('Отрицательных: ',a.Where(t->t<0).Count);
Writeln('Нулевых: ',a.Where(t->t=0).Count)
end.

Пример
n= 10
Вводите: 3.7 12.6 -4 0 -13.2 0.7 0 14 2.12 0.004
Положительных: 6
Отрицательных: 2
Нулевых: 2

№16

begin
var a:=Arr(-3.7,-3.1,-2.3,-1.6,-0.9,-0.2,0.5,1.2,1.9,2.6,3.3,4.0,4.2,5.4,
      1.92,1.76,1.52,1.26,0.95,0.45,0.71,1.10,1.38,1.61,1.82,2.00,2.05,2.32);
var d:=a.Length div 2;
for var i:=0 to d-1 do Writeln(a[i]:5:2,a[i+d]:20:3)
end.

Результат
-3.70               1.920
-3.10               1.760
-2.30               1.520
-1.60               1.260
-0.90               0.950
-0.20               0.450
0.50               0.710
1.20               1.100
1.90               1.380
2.60               1.610
3.30               1.820
4.00               2.000
4.20               2.050
5.40               2.320

№19

begin
var n:=ReadInteger('n=');
var a:=ArrRandom(n,-50,50); a.Println;
var i:=1;
while i<=n do begin
    Print(a[i-1]);
    i*=2
    end;
Writeln
end.

Пример
n= 17
-43 -41 -37 -43 12 45 -34 -19 -38 33 -34 39 -40 33 -46 4 39
-43 -41 -43 -19 4

4,6(60 оценок)

Это интересно:

Здоровье

30.11.2022

Как избавиться от взрослых подгузников: советы от эксперта...

Образование-и-коммуникации

06.10.2021

Как рисовать вертолет: советы от профессионалов...

Образование-и-коммуникации

07.05.2023

Прощайте спам! Как избавиться от ненужной почты в ящике...

Кулинария-и-гостеприимство