Определите значение переменной a после выполнение данного алгоритма: b: =4 a: =-3 b: =7-2*a-b a: =b/3-a

Уменя 6 получилось)

Var i, b, c, n, m: integer;     a: string;     d: array [0..50] of integer; begin       readln(n, m);       a : = inttostr(n);       for i : = 1 to length(a) do           if (strtoint(a[i]) mod 2 = 0) then           begin               d[c] : = strtoint(a[i]);               c : = c + 1;           end;       for i : = 0 to m - 1 do   writeln(d[i], ' '); end.так, кажется, только если ввести число больше кол-ва чётный цифр в числе, то будет ошибка, я не знаю, как бороться.

1) Да, вполне себе может распростроняться как по локальной сети, так и по сети Интернет.

2) Может наносить ущерб секторам загрузки, зависит от того, что является целью поражения вируса. В реальном мире зачастую есть вирусы шифровальщики, вирусы RAT (Remote Access Tool)

3) Макрокоманды? Это макросы в word? или это вставки на assembly?) Не  очень корректно поставлен вопрос, скорее нет, чем да.

4) Может вполне изменить название файла -- изменить расширение тоже. Зависит опять же от того какая цель у вируса. При повреждении расширения может повредиться система, например изменение расширений системных файлов / кешей / поврежедение свапа (если включен в системе) и тд.

5) Может вполне повредить исполняемые файлы, дописывая, или меня машинный код, транкейтя (truncate file) файлы. Все что угодно.

--

Вопросы поставлены не совсем корректно, но я бы сказал, что верны утверждения 1,2,4,5.