Онлайн-конструктор блок-схем

graph TD
A[Осведомленность (Awareness)] --> B(Рассмотрение (Consideration))
B --> C{Решение (Decision)}
C --> D((Покупка (Purchase)))
D --> E[/Лояльность (Loyalty)/]

subgraph Этап 1
A1[**Цель:** Преодолеть барьер низкой узнаваемости]
A2[**Аудитория:** Подростки 13-17 лет]
A3[**KPI:** Охват 5+ млн, узнаваемость до 65%]
A --> A1
A --> A2
A --> A3
end

subgraph Этап 2
B1[**Цель:** Сформировать интерес и желание]
B2[**Фокус:** Уникальный дизайн и качество]
B3[**KPI:** Просмотры видео, участие в конкурсах]
B --> B1
B --> B2
B --> B3
end

subgraph Этап 3
C1[**Цель:** Подтолкнуть к выбору Big City Cats]
C2[**Стратегия:** Снять барьеры (цена, доступность)]
C3[**KPI:** Добавления в корзину, запросы "где купить"]
C --> C1
C --> C2
C --> C3
end

subgraph Этап 4
D1[**Цель:** Удобный процесс покупки]
D2[**Каналы:** Онлайн и оффлайн]
D3[**KPI:** Конверсия в покупку, выручка]
D --> D1
D --> D2
D --> D3
end

subgraph Этап 5
E1[**Цель:** Постоянные фанаты (67.6% готовы купить снова)]
E2[**Стратегия:** Программа лояльности, комьюнити]
E3[**KPI:** NPS, процент повторных покупок]
E --> E1
E --> E2
E --> E3
end
style A fill:#f9f,stroke:#333,stroke-width:2px
style B fill:#ccf,stroke:#333,stroke-width:2px
style C fill:#fcf,stroke:#333,stroke-width:2px
style D fill:#ffc,stroke:#333,stroke-width:2px
style E fill:#eee,stroke:#333,stroke-width:2px

3

51

graph TD
A[Старт] --> B[Инициализация файла данных]
B --> C[Очистка экрана]
C --> D[Вывод меню]
D --> E{Выбор действия}
E -->|1| F[Оценить новый проект]
E -->|2| G[Просмотреть рейтинг проектов]
E -->|3| H[Редактировать проект]
E -->|4| I[Удалить проект]
E -->|5| J[Выход]

graph TD
A["
**МЕТА:**
Готовність майбутніх соціальних працівників до патріотичного виховання молоді засобами соціально-культурної діяльності (СКД)
"] --> B["**Мотиваційно-ціннісний компонент**"];
A --> C["**Когнітивний компонент**"];
A --> D["**Діяльнісно-практичний компонент**"];
A --> E["**Особистісно-рефлексивний компонент**"];

B --> B1["Патріотичні цінності та переконання [1, 2]"];
B --> B2["Інтерес до патріотичного виховання та СКД [3, 4]"];
B --> B3["Усвідомлення професійної відповідальності [5, 6]"];
B --> B4["Прагнення до самовдосконалення [7, 8]"];

C --> C1["Знання теорії та методики патріотичного виховання [9, 10, 7]"];
C --> C2["Знання історії, культури України, національної ідентичності [11, 12]"];
C --> C3["Знання нормативно-правової бази [13, 14, 15, 16]"];
C --> C4["Знання специфіки СКД для патріотичних цілей [17, 18, 19]"];

D --> D1["Діагностичні вміння [20, 21, 22, 23]"];
D --> D2["Проєктувальні вміння (СКД) [10, 24, 11, 25]"];
D --> D3["Організаційні та фасилітативні вміння [26, 27, 28]"];
D --> D4["Комунікативні вміння [5, 27, 21]"];
D --> D5["Аналітичні та оцінні вміння [29, 30, 25, 31]"];

E --> E1["Особистісні патріотичні якості [32, 33, 34]"];
E --> E2["Емпатія, толерантність [35, 36]"];
E --> E3["Креативність, ініціативність [37, 38, 39]"];
E --> E4["Здатність до самоаналізу та професійного зростання [40, 41, 20]"];

F["**Методологічні підходи**
(Фундамент формування готовності)
- Системний [42, 43, 44, 45]
- Компетентнісний [42, 46, 25, 47]
- Особистісно-орієнтований [36, 48, 49]
- Діяльнісний [42, 48, 50, 51]"];

G["**Засоби реалізації та контекст:**
Соціально-культурна діяльність (СКД)
- Традиційні форми [17, 52]
- Інноваційні форми [17, 53, 54, 55]
- Мистецтво, краєзнавство, волонтерство тощо [56, 26, 57, 58]"];

F --> A;
A -.-> G;
B -.-> G;
C -.-> G;
D -.-> G;
E -.-> G;

subgraph "Компоненти готовності"
B
C
D
E
end

style A fill:#DAF7A6,stroke:#333,stroke-width:2px
style F fill:#FFC300,stroke:#333,stroke-width:2px
style G fill:#C70039,stroke:#333,stroke-width:2px
style B fill:#E8DAEF,stroke:#333,stroke-width:1px
style C fill:#E8DAEF,stroke:#333,stroke-width:1px
style D fill:#E8DAEF,stroke:#333,stroke-width:1px
style E fill:#E8DAEF,stroke:#333,stroke-width:1px

program LocalMaximum;

var
arr: array of Integer;
N, i, localMaxIndex: Integer;
found: Boolean;

begin
Write('Введите размер массива N: ');
ReadLn(N);

SetLength(arr, N);

WriteLn('Введите ', N, ' элементов массива:');
for i := 0 to N - 1 do
begin
Write('Элемент ', i + 1, ': ');
ReadLn(arr[i]);
end;

// Вывод массива на экран
Write('Массив: ');
for i := 0 to N - 1 do
begin
Write(arr[i], ' ');
end;
WriteLn;

// Поиск первого локального максимума
found := False;
for i := 1 to N - 2 do
begin
if (arr[i] > arr[i - 1]) and (arr[i] > arr[i + 1]) then
begin
localMaxIndex := i;
found := True;
Break;
end;
end;

if found then
WriteLn('Номер первого локального максимума: ', localMaxIndex + 1)
else
WriteLn('Локальный максимум не найден.');
end.

+-----------------------------------------------------------------------+
| Линейная панель |
+-----------------------------------------------------------------------+
| |
| Присоединение 1 ---> Разъединитель Q1 ---> Автоматический выключатель CB1 ---+---> Трансформатор тока TA1 ---> Амперметр A1 ---> L1 |
| | | ---> L2 |
| | | ---> L3 |
| | +-----------------------------------------------+
| |
| Присоединение 2 ---> Разъединитель Q2 ---> Автоматический выключатель CB2 ---+---> Трансформатор тока TA2 ---> Амперметр A2 ---> L4 |
| | | ---> L5 |
| | | ---> L6 |
| | +-----------------------------------------------+
+-----------------------------------------------------------------------+

L1, L2, L3, L4, L5, L6 - отходящие линии

program RemoveDuplicateChars;

var
s: string;
result: string;
i, j: integer;
found: boolean;

begin
Write('Введите строку: ');
ReadLn(s);

result := '';

for i := 1 to Length(s) do
begin
found := false;
for j := 1 to Length(result) do
begin
if s[i] = result[j] then
begin
found := true;
break; // Выходим из внутреннего цикла, если нашли дубликат
end;
end;

if not found then
begin
result := result + s[i];
end;
end;

WriteLn('Строка с удаленными повторами: ', result);

ReadLn;
end.

flowchart TD
subgraph Линейная структура
direction TB
Начальник --> Сотрудник_1
Начальник --> Сотрудник_2
Начальник --> Сотрудник_3
end

subgraph Функциональная структура
direction LR
Начальник --> Отдел_1
Начальник --> Отдел_2
Начальник --> Отдел_3
Отдел_1 --> Сотрудник_1a & Сотрудник_1b
Отдел_2 --> Сотрудник_2a & Сотрудник_2b
Отдел_3 --> Сотрудник_3a & Сотрудник_3b
end

subgraph Матричная структура
direction RL
Начальник --> Проект_1
Начальник --> Проект_2
Проект_1 -.-> Сотрудник_1
Проект_1 -.-> Сотрудник_2
Проект_2 -.-> Сотрудник_3
Проект_2 -.-> Сотрудник_4
end

subgraph Проектная структура
direction BT
Проект --> Команда
Команда --> Сотрудник_1
Команда --> Сотрудник_2
Команда --> Сотрудник_3
end

subgraph Сетевая структура
direction LR
Центр --> Партнер_1
Центр --> Партнер_2
Центр --> Партнер_3
end

Sub CalculateValues()
Dim a As Double
Dim b As Double
Dim c As Double
Dim x As Double
Dim y As Double
Dim boundary As Double

' Initialize the variables
a = 3.2
b = 2.3
c = 4.5

' Calculate the boundary value
boundary = 10 - b ^ 2

' Determine x based on condition
If a <> b Then
x = a ^ 2 + b ^ 2
Else
x = a * b
End If

' Determine y based on x
If x > boundary Then
y = a * x + b
ElseIf x = boundary Then
y = Abs(a * x - c)
End If

' Output the results
Debug.Print "x = " & x
Debug.Print "y = " & y
End Sub