Анастасия, Вам нужно поменять местами строки 60 и 61. Сейчас программа ищет только одну пару чисел, а по условию нужно выводить их все, т.к. вывод сообщения в Memo1 произойдет только после прохода двух циклов for (для параметров i и j)
Если хотите улучшить программу: можно добавить проверку на тот случай, если ни одной подходящей пары не будет найдено.
Можно еще в StringGrid'е оставить одну строку, т.к. остальные не используются, за это отвечает свойство RowCount
Мемо1 в начале процедуры желательно очистить от сообщений, Memo1.Lines.Clear; если только Вы не хотите хранить всю историю работы программы.
Объяснение:
ответ: 1)Предотвратить заражение и другие угрозы
Защищать рабочие станции от информационных угроз ( вирусы , хакеры), предотвращать
3) Ноутбуки , смартфоны , планшеты , умный офис
4) Сотрудники не знающие правила информационной безопасности, конкуренты , хакеры , промышленные шпионы, мошенники. 5) Хакеры , вирусы, фишинг , нигерийский письма 6) Обучение сотрудников ( тренинги, лекции) ,объявление награды за предотвращение вирусного заражения , наличие службы информационной безопасности ,системного администратора, наличие защитного решения 7) Антивирус для бизнеса Kaspersky , Dr.Web, Avira,Panda,360 Security ,