Блок схема для проверки числа на составное ли оно

Вот рабочая программа проверки, является ли число составным (Pascal):

Составь по ней блок-схему :)))

 Начало 

| 

|--> Введите число n 

| 

|--> Установите флаг составного числа в False 

| 

|--> Для каждого числа i от 2 до корня из n: 

|       | 

|       |--> Если n делится на i без остатка: 

|       |       | 

|       |       |--> Установите флаг составного числа в True 

|       |       | 

|       |       |--> Прервать цикл 

|       | 

|       |--> Иначе: 

|               | 

|               |--> Продолжить цикл 

| 

|--> Если флаг составного числа равен True: 

|       | 

|       |--> Вывести "Число является составным" 

| 

|--> Иначе: 

        | 

        |--> Вывести "Число не является составным" 

| 

Конец 

Этот алгоритм работает, проверяя, делится ли число n на любое число от 2 до корня из n без остатка. Если такое число существует, то n является составным числом. В противном случае, n не является составным числом.

┌─────────────────────────────────┐
│ Начало программы │
└─────────────────────────────────┘
│
▼
┌───────────────────┐
│ Ввод числа │
└───────────────────┘
│
▼
┌───────────────────┐
│ Проверка числа │
└───────────────────┘
│
├─┬─ Если число меньше 2, то оно не является составным
│ │
│ ├─ Иначе, переходим к следующему шагу
│ │
│ │
├─┬─ Инициализация переменной "делитель" значением 2
│ │
│ │
│ │
├─┬─ Цикл проверки делителей
│ │
│ │ ├─┬─ Если текущий "делитель" больше половины числа, то число простое
│ │ │ │
│ │ │ ├─ Иначе, переходим к следующему шагу
│ │ │ │
│ │ │ │
│ │ │ │
│ │ ├─┬─ Если число делится на текущий "делитель", то число составное
│ │ │ │
│ │ │ ├─ Иначе, увеличиваем "делитель" на 1 и переходим в начало цикла
│ │ │ │
│ │ │ │
┌───────┴─┴───────┴──────┐
│ Вывод результата │
└───────────────────────┘
│
▼
┌─────────────────────┐
│ Конец программы │
└─────────────────────┘

({e
};
Start")
type "Blya bratan prover, sostavnoe eto chislo ili net, a to ya ne eby"
;