В программу вводятся 2 значения: любое семизначное число и любая цифра. Если цифра есть в данном числе программа должна написать "ДА", если такой цифры нет программа должна написать "НЕТ"

ОТДЕЛ Задание+;
ИСПОЛЬЗУЕТ Вывод ИЗ "...ОтделыОбмен", Приём ИЗ "...ОтделыОбмен";

ПЕР
  число, цифра: ЦЕЛ;

УКАЗ
  число := Приём.Число(); Вывод.Цепь("^");
  цифра := Приём.Число(); Вывод.Цепь("^");
  КОЛЬЦО
    ПОКА число > 0 ВЫП
      ЕСЛИ число ОСТАТОК 10 = цифра ТО
        Вывод.Цепь("ДА");
        ВЫХОД
      КОН
    КОН;
    Вывод.Цепь("НЕТ");
    ВЫХОД
  КОН

КОН Задание.

Отдел +; использует вывод из "", приём из ""; пер   число, цифра: цел; указ   число : = приём.число(); вывод.цепь("^");   цифра : = приём.число(); вывод.цепь("^");   кольцо     пока число > 0 вып       если число остаток 10 = цифра то         вывод.цепь("да");         выход         кон     кон;     вывод.цепь("нет");     выход   кон кон .

В 1988 году была отмечена эпидемия компьютерного вируса Jerusalem, который был запрограммирован на особенно разрушительные действия, если активировался в пятницу 13-го. В первый раз это произошло в пятницу 13 мая 1988 года. Этот чёрный юмор был перенят авторами некоторых других компьютерных вирусов.

Компьютером управляет операционная система состоящая из набора различных программ при помощи различных команд. Если имеется ввиду удаленное управление компьютером, то разные программы бывают.