Срочно! Помогите, пожалуйста, с решением задачи по информатике 10 класс, с пояснением. Заранее благодарю.

Простые:310711310721310727310729Проверить можно при помощи программы:function prost(n:integer):boolean; var i:integer; begin if n<=1 then writeln('Числа меньше 2 не являются простыми') else begin prost:=true; for i:=2 to Round(Sqrt(n)) do if n mod i=0 then prost:=false; end; end; var x:integer; begin write('x=');readln(x); if prost(x) then writeln('Простое') else writeln('Не простое'); readln end.