Напишите программу, которая выводит все простые числа в диапазоне от k до n ( 2 ≤ k ≤ n ≤ 100000 ). pascal

Var   k,n,x,d: integer; begin   read(k,n);   for x : = k to n do   if x mod 10 = 3 then       begin       d : = 2;       while x mod d < > 0 do d : = d + 1;       if x = d then write(x,' ');       end; end.

Текстовые процессоры,электронные таблицы,графические редакторы,растровые

Блок-схема - в прилагаемом файле.

Какую таблицу фото добавь хотябы