Файлдық вирустар көбінесе бағдарламалардың орындалатын модульдеріне енеді (бағдарлама іске қосылатын файлдар), бұл оның жұмысына әсер ететін, бағдарлама іске қосылған сәтте оларды іске қосуға мүмкіндік береді. Әдетте, файлдық вирустар операциялық жүйеге немесе бағдарламалық жасақтама кітапханаларына, орындалатын пакеттік файлдарға, Windows тізілім файлдарына, сценарий файлдарына және драйвер файлдарына енуі мүмкін. Инъекцияны шабуыл жасалған файлдың кодын өзгерту арқылы немесе оның өзгертілген көшірмесін жасау арқылы жүзеге асыруға болады. Осылайша, файлдағы вирус қолданушы немесе ОС өзі бастаған осы файлға қол жеткізген кезде іске қосылады. Файлдық вирустар - компьютерлік вирустың ең көп таралған түрі.
var
t:boolean;
d:integer;
begin
t := true;
d := 2;
while t and (d*d <= x) do
begin
if x mod d = 0 then
t := false;
d := d + 1
end;
prime := t
end;
function order(x:integer):boolean;
var
t:boolean;
d:integer;
begin
d := -1;
repeat
t := x mod 10 > d;
d := x mod 10;
x := x div 10
until not t or (x = 0);
order := t
end;
var
t:boolean;
i,k,n:integer;
begin
t := false;
read(k,n);
for i := k to n do
if prime(i) then
if order(i) then
begin
write(i,' ');
t := true
end;
if not t then
write(0)
end.