Сколько раз будет выполнен цикл for n:=1 to 47 do?

Цикл будет выполнен 47 раз

Результат запуску программы:

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

25

26

27

28

29

30

31

32

33

34

35

36

37

38

39

40

41

42

43

44

45

46

47

понятие и св-ва

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

 

Чтобы защитить свою информацию или  какие либо данные

нужно:1)хранить данные на жёстк.дисках или usb накопителях

2)нужно шифровать свои данные

3)обновлять своё программное обеспечение

4ну и последнее иметь хороший антивирус

 

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

Вирусом является любая несущая в себе вредоносную программу.

Напишу своими словами, что это специально написанная программа,содержит в себе вредоносный код,наносит вред компьютеру(как и большой так и малый взависмости от самого вируса)

 

виды:Троян(нарушает нормальную работу твоего компьютера)

Троянский конь(предоставляет каким либо пользователям доступ к твоему персональному компьютеру)

А также вирусов великое множество  в интернете

 

Антивирусные программы:

 

То есть допустим слово Антиспамер(это тот кто борится против спама.плагиата,копии и т.д(т .е Анти-"против")

Модератор обрабатывает информацию(почти как генератор или главный мозг отвечающий за сохранность и многое многое)

 

А антивирусные программы почти тоже самое борится против вирусов,несанкционированного доступа,занимается обработкой данных,сканированием.

Зачастую люди сами виноваты что к ним попал вирус,они либо отключили антивирус,либо произвольно незная этого, открыли  доступ к персональному компьютеру)

 

Виды антивирусных программ:

1-Аваст

2-Касперский

3-Dr.Web и т.д

 

Советую ставить аваст так как он более надёжней и простой,но всё равно выбор за вами!удачи:)

 

 

Посмотри в Help'е функцию Exec. У  меня Turbo Pascal поэтому пример оттуда

 

Program StartApl; 

{$M $4000, 0, 0 } { 16Kб стек, нет кучи }
uses Crt, Dos;
var ProgramName, CmdLine : String;
begin

    ClrScr;  
    Write('Имя программы для запуска (с путём) : ');
    ReadLn(ProgramName);
    Write('Параметры командной строки ', ProgramName, ' : ');
    ReadLn(CmdLine);
    WriteLn('Пробую запустить...');
   SwapVectors;
   Exec(ProgramName, CmdLine);
   SwapVectors;
   WriteLn('... вернулся из Exec');
{ Была ошибка ? }
  if DosError <> 0 then  WriteLn('Ошибка DOS #', DosError)
       else  WriteLn('Запуск был удачным. Код выхода = ', DosExitCode);
end.