"программирование алгоритмов с ветвлением"? !

В языке Паскаль имеется оператор ветвления. Другое его название - условный оператор. Формат полного оператора ветвления следующий:

if <логическое выражение> then <оператор1>
else <оператор2>
Здесь if - "если", then - "то", else - "иначе".

# Задание 1

num = input('Введи целое число: ')

print('Количество цифр в числе = {}'.format(len(num)))

# Задание 2

from random import randint

print('Выпало {}'.format(randint(1, 6)))

# Задание 3

a = int(input('Введи 1 число: '))

b = int(input('Введи 2 число: '))

i = min(a, b)

while True:

   if i % a == 0 and i % b == 0:

       break

   i += 1

print(f'НОК = {i}')

# Задание 4

def fibonacci(n):

   a = 0

   b = 1

   if n < 0:

       print("Некорректный ввод!")

   elif n == 0:

       return a

   elif n == 1:

       return b

   else:

       for i in range(2, n):

           c = a + b

           a = b

           b = c

       return b

n = int(input('Введи N-ое число Фибоначчи: '))

print('Число Фибоначчи = {}'.format(fibonacci(n)))

Объяснение:

Python 3.8.2

1. Примерно так учат писать программы в большинстве школ

var
  n,s:integer;

begin
  s:=0;
  repeat
    Read(n);
    if n<>0 then
      if (n mod 6=0) and (n mod 10=2) then s:=s+n
  until n=0;
  Writeln(s)
end.

Пример
16
42
18
132
94
18
0
174

Кроме этого, зачем-то требуют блок-схему  - приведена во вложении, выполнена по ГОСТ 19.701-90 (ISO 5807-85).

2. А вот так эту задачу можно решить в современном Паскале

PascalABC.NET 3.3.5, сборка 1660 от 20.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  ReadSeqIntegerWhile(t->t<>0)
      .Where(t->(t mod 6=0) and (t mod 10=2)).Sum.Println
end.

И блок-схема тут вообще не нужна: она ничего не даст.

Сравнение явно не в пользу школьного "образования" - учить, как выполнять работу двадцать минут вместо двух.