Оператор условного перехода

Оператор условного перехода в Турбо Паскаль имеет вид:

if условие then оператор 1 else оператор 2;

условие - это логическое выражение, в зависимости от которого выбирается одна из двух альтернативных ветвей алгоритма. Если значение условия истинно (TRUE), то будет выполняться оператор 1, записанный после ключевого слова then. В противном случае будет выполнен оператор 2, следующий за словом else, при этом оператор 1 пропускается. После выполнения указанных операторов программа переходит к выполеннию команды, стоящей непосредственно после оператора if.

Необходимо помнить, что перед ключевым словом else точка с запятой никогда не ставится!

else - часть в операторе if может отсутствовать:

if условие then оператор 1;

Тогда в случае невыполнения логического условия управление сразу передается оператору, стоящему в программе после конструкции if.Следует помнить, что синтаксис языка допускает запись только одного оператора после ключевых слов then и else, поэтому группу инструкций обязательно надо объединять в составной оператор (окаймлять операторными скобками begin... end). В противном случае возникает чаще всего логическая ошибка программы, когда компилятор языка ошибок не выдает, но программа тем не менее работает неправильно. Примеры.

if x > 0 then modul: = x else modul: = -x;

if k > 0 then WriteLn('k - число положительное');

if min > max then begin

t: = min;

min: = max;

max: = t;

end;

Найти максимальное из двух целых чисел X, Z: Y = max{X, Z}.

Исходные данные: X, Z.

Результат: Max.

Метод решения задачи: нужно сравнить два числа и сделать вывод. Блок-схема алгоритма решения этой задачи выглядит следующим образом: program max;

Var

x, z, max: integer;

Begin

writeln (‘Введите два числа');

Readln (x, z);

if x> z then max: =x;

if x< z then max: =z

else writeln(‘Числа равны');

Writeln(max);

Readln;

End.

Вычислить

Var n, k: integer; x, S: real;

begin

write('Vvedite n, x');

read(n, x);

S: =0;

for k: =1 to n do

begin

S: =S+(k-1)*exp(k*ln(x))/k;

end;

writeln('S=', S: 10: 3);

end.

25 билет

1) Компьютерные вирусы

Вредительские программы и, прежде всего, вирусы представляют очень серьёзную опасность для информации в компьютерных системах. Знание механизмов действия вирусов, методов и средств борьбы с ними позволяет эффективно организовать противодействие вирусам, свести к минимуму вероятность заражения и потерь от их воздействия.

Средой обитания сетевых вирусов являются элементы компьютерных сетей. Файловые вирусы размещаются в исполняемых файлах. Загрузочные вирусы находятся в загрузочных секторах внешних запоминающих устройств. Комбинированные вирусы размещаются в нескольких средах обитания. Например, загрузочно-файловые вирусы.

По способу заражения среды обитания компьютерные вирусы делятся на:

· резидентные;

· нерезидентные.

Резидентные вирусы после их активизации полностью или частично перемещаются из среды обитания в оперативную память компьютера. Эти вирусы, используя, как правило, привилегированные режимы работы, разрешённые только операционной системе, заражают среду обитания и при выполнении определённых условий реализуют вредительскую функцию.

Нерезидентные вирусы попадают в оперативную память компьютера только на время их активности, в течение которого выполняют вредительскую функцию и функцию заражения. Затем они полностью покидают оперативную память, оставаясь в среде обитания.

По степени опасности для информационных ресурсов пользователя вирусы разделяются на:

· безвредные;

· опасные;

очень опасные.

Безвредные вирусы создаются авторами, которые не ставят себе цели нанести какой-либо ущерб ресурсам компьютерной системы. Однако такие вирусы всё-таки наносят определённый ущерб:

· расходуют ресурсы компьютерной системы;

· могут содержать ошибки, вызывающие опасные последствия для информационных ресурсов;

· вирусы, созданные ранее, могут приводить к нарушениям штатного алгоритма работы системы при модернизации операционной системы или аппаратных средств.

Опасные вирусы вызывают существенное снижение эффективности компьютерной системы, но не приводят к нарушению целостности и конфиденциальности информации, хранящейся в запоминающих устройствах.

Очень опасные вирусы имеют следующие вредительские воздействия:

· вызывают нарушение конфиденциальности информации;

· уничтожают информацию;

· вызывают необратимую модификацию (в том числе и шифрование) информации;

· блокируют доступ к информации;

· приводят к отказу аппаратных средств;

· наносят ущерб здоровью пользователям.

По алгоритму функционирования вирусы подразделяются на:

· не изменяющие среду обитания при их распространении;

· изменяющие среду обитания при их распространении.

Для борьбы с компьютерными вирусами используются специальные антивирусные средства и методы их применения. Антивирусные средства выполняют следующие задачи:

· обнаружение вирусов в компьютерных системах;

· блокирование работы программ-вирусов;

· устранение последствий воздействия вирусов.

Обнаружение вирусов и блокирование работы программ-вирусов осуществляется следующими методами:

· сканирование;

· обнаружение изменений;

· эвристический анализ;

· использование резидентных сторожей;

· вакцинирование программ;

· аппаратно-программная защита.

Устранение последствий воздействия вирусов реализуется следующими методами:

· восстановление системы после воздействия известных вирусов;

· восстановление системы после воздействия неизвестных вирусов.

Компьютерные вирусы - это небольшие исполняемые или интерпретируемые программы, обладающие свойством распространения и самовоспроизведения в компьютерных системах. Вирусы могут выполнять изменение или уничтожение программного обеспечения или данных, хранящихся в компьютерных системах. В процессе распространения вирусы могут себя модифицировать.

Все компьютерные вирусы классифицируются по следующим признакам:

1. по среде обитания;

2. по способу заражения;

3. по степени опасности вредительских воздействий;

4. по алгоритму функционирования.

По среде обитания компьютерные вирусы подразделяются на:

· сетевые;

· файловые;

· загрузочные;

· комбинированные.

Label m1;

Var n, i: integer; x, y: real;

Begin

Write('Vvedite n');

Read(n);

i: =1;

m1: Write('Vvedite x');

Read(x);

If x> =0

then y: =ln(4*x*x+5)

else y: =sqrt(4*x*x+5);

write('y=', y: 0: 3);

i: =i+1;

If i< =n then goto m1

End.

26 билет

1)Основные принципы организации и функционирования компьютерных сетей. Интернет. Информационные ресурсы и сервисы компьютерных сетей: Всемирная паутина, файловые архивы, интерактивное общение. Назначение и возможности электронной почты. Поиск информации в Интернете.