Напишите программу, которая выводит все простые числа в диапазоне от K до N ( 2 ≤ K ≤ N ≤ 100000 ), оканчивающиеся на цифру 3. Входные данные:Входная строка содержит два натуральных числа, разделённые пробелом, K и N ( 2 ≤ K ≤ N ≤ 100000 ). Программа должна вывести все простые числа, оканчивающиеся на цифру 3, в диапазоне от K до N в одну строку, разделив их пробелами. Если таких чисел нет, нужно вывести число 0. Например входные данные :15 22; выход:0. Программа в паскале ABC 1.8

Program n1;
function pr(a:longint ):boolean;
var i: longint;
begin
if aelse
begin
pr:=true;
for i:=2 to round(sqrt(a)) do
if a mod i=0 then pr:=false;
end;
end;
var k,n,x: longint;
b: boolean;
begin
b:=false;
readln(k,n);
if (k>=2) and ( n>=k) and (n begin
b:=true;
write(x, );
end;
if b=false then writeln(0);
end.