k = 5
Объяснение:
q = 15 s = 0 i = 1
Цикл с постусловием:
s = s + i
i = i + 1
выход из цикла когда s > q
q = 15 s = 0 i = 1
s = 0 + 1 = 1
i = 1 + 1 = 2
1 > 15 (НЕТ)
q = 15 s = 1 i = 2
s = 1 + 2 = 3
i = 2 + 1 = 3
3 > 15 (НЕТ)
q = 15 s = 3 i = 3
s = 3 + 3 = 6
i = 3 + 1 = 4
6 > 15 (НЕТ)
q = 15 s = 6 i = 4
s = 6 + 4 = 10
i = 4 + 1 = 5
10 > 15 (НЕТ)
q = 15 s = 10 i = 5
s = 10 + 5 = 15
i = 5 + 1 = 6
15 > 15 (НЕТ)
q = 15 s = 15 i = 6
s = 15 + 6 = 21
i = 6 + 1 = 7
21 > 15 (ДА) - выход из цикла
q = 15 s = 21 i = 7
k = i - 2
k = 7 - 2 = 5
ответ: 1)Предотвратить заражение и другие угрозы
Защищать рабочие станции от информационных угроз ( вирусы , хакеры), предотвращать
3) Ноутбуки , смартфоны , планшеты , умный офис
4) Сотрудники не знающие правила информационной безопасности, конкуренты , хакеры , промышленные шпионы, мошенники. 5) Хакеры , вирусы, фишинг , нигерийский письма 6) Обучение сотрудников ( тренинги, лекции) ,объявление награды за предотвращение вирусного заражения , наличие службы информационной безопасности ,системного администратора, наличие защитного решения 7) Антивирус для бизнеса Kaspersky , Dr.Web, Avira,Panda,360 Security ,
Відповідь:
program nodd;
var chislo1, {первое число}
chislo2, {второе число}
nod, {наибольший общий делитель}
r:integer; {остаток отделения 1-го числа на 2-е}
begin
Writeln ('Vvedite chisla:');
Readln (chislo1,chislo2); {ввод двух чисел с клавиатуры}
while (chislo1 mod chislo2)<>0 do {цикл выполняется пока остаток <> 0}
begin
r:=chislo1 mod chislo2; {вычисление остатка 1-го числа на 2-ое}
chislo1:=chislo2; {присваиваем 2-е число 1-му}
chislo2:=r; {присваиваем остаток от деления 2-му числу}
end;
nod:=chislo2; {присваиваем 2-е число переменной nod}
Writeln ('NOD: ',nod); {Вывод НОД}
Readln;
end.
Пояснення: