تعیین اول بودن عدد دلخواه (نوشته شده با کد فرترن)

برنامه ای که عدد دلخواه را از کاربر می گیرد و تعیین میکند که آیا عدد اول است یا خیر ...