Паскаль.
Немного не понятно: от 1 до 10 это относится только к нечетным числам или ко всем? Ну напишу программу которая просто все числа вычисляет, если сама не сможешь поставить условие ограничения, то сообщи точное условие задачи и напиши мне в личку
program jjj;
var a: array [1..10] of integer; i,summa,proizv:integer;
begin
for i:=1 to 10 do begin
Writeln('напишите элемент массива номер ',i); read(a[i]);
end;
For i:=1 to 10 do begin
if a[i] mod 2=0 then summa:=summa+a[i] else
proizv:=proizv*a[i];
end;
Writeln(summa,' ',proizv); readln;
end.
Відповідь:
Пояснення:
Компьютерный вирус такой же мерзкий, как и вирусы для людей, изначально неактивный, скрытый, но постепенно ослабляющий компьютер, даже если мы сначала этого не замечаем. Они могут показать нам ошибки, заиливание системы, всплывающие окна или рекламные объявления. Они также могут нанести серьезный ущерб, удалить файлы, заразить наши данные своим кодом и украсть информацию с компьютера.
Примеры компьютерных вирусов:
Файловые вирусы
Макрос вирусов
Материнские платы вирусы
Кластерные вирусы
Вирусы вторжения
Многослойные вирусы
