ДАЮ 30 БАЛЛОВ! 7 класс !! Написать программу на Паскале

Вдповдь:

Треба перебрати вс числа менш нього по черз подлити на них, якщо при дленн получаться цле число то в лчильник, який спочатку рвний нулю додати одиницю, якщо не цле то перейти до наступного числа. В кнц если лчильник буде рвний 2 це просте число а н то це складне потрбно вивести на екран итог лчильника. Ось приклад на Python:

o=0

m=int(input("Скажи число я скажу чи воно просте."))

for h in range(1,m+1):

   if(m%h==0):

       o=o+1

if(o==2):

   print("Це число просте")

elif(o==1):

   print("Одиниця окремим числом(не простим не складним).")

else:

   print("Це число складене")

print("До побачення, натисни Enter для завершення")

p=input()