Var R,x,y : real; k,i: integer;
begin
write('R='); readln(R);
k:=0;
for i:=1 to 3 do
begin
write('x = '); readln(x);
write('y = '); readln(y);
if sqrt(x*x+y*y)<=R then k:=k+1;
end;
writeln('В круг попали ',k,' точек');
<span>end.</span>
Скореи всего нет я пробывал нет.
1) Вирус - это вредоносная программа, которая распространяется копируя себя (возможно не полностью). Различаются по способу попадания на устройство, типу заражаемых объектов, способу распространения и типу вредоносных действий
В среднем жизненный цикл вируса такой: попадание на устройство, активация, поиск объектов для заражения, заражение, распространение
2) Вообще вирус может делать все то же, что и другая программа. Теоретически вирус может быть даже полезным. Но так или иначе он совершает действия не санкционированные самим пользователем или системой
Примеры вредоносных действий
- использование ресурсов системы в своих целях (вычисления, Ддос атаки,...)
- удаление или порча, шифрование файлов
- нарушение работы системы/ОС
- кража личных данных пользователя (напр. данных банковских карт, паролей)
- нарушение работы программ
- перегрузка/блокировка линий связи
- спам, внедрение угрожающих/рекламных сообщений, переходы на нежелательные сайты
Начало
выкопать в земле ямку
опустить в ямку саженец
засыпать ямку с саженцем землей
полить саженец водой
Конец
Начало и конец в овале, остальное в прямоугольнике.
Эта презентация Вам в помощь : http://u.to/A4wWBQ