20 ! составьте: линейный, разветляющийся и циклический алгоритмы.

Линейный:
Как сделать бутерброд
Отрежь ломтик хлеба
Намажь его маслом
Отрежь ломтик сыра
Положи его на хлеб

Разветвляющийся:
Начало
...
Надеть сапоги. Надеть туфли
Конец
Циклический:
Точить карандаш
Да пустая коробка? Нет
Конец

Как-то так

var a:array [1..10] of integer;
maxi,mini,max,min:integer;
Begin
    maxi:=2;
    mini:=2;
    for i:= 1 to 10 do Begin
        read(a[i]);

        if i=2 then begin
            max = a[i]-a[i-1];
            mix = a[i]-a[i-1];
        end;

        if i>2 and max < a[i]-a[i-1] then begin
            max = a[i]-a[i-1];
            maxi = i;
        end;

        if i>2 and min > a[i]-a[i-1] then begin
            mix = a[i]-a[i-1];
            mixi = i;
        end;
    end;

    writeln('min: a[',mini,'] - a[',mini-1,'] = ',min);
    writeln('max: a[',maxi,'] - a[',maxi-1,'] = ',max);

End.

1:

a = int(input())  

b = int(input())

if a == b:

   print('Числа равны')

elif a > b:

   print(f'Первое число - {a} больше, чем второе число - {b})

elif a < b:

  print(f'Второе число - {b} больше, чем первое число - {a}')

2:

a = int(input())  

b = int(input())

print('Периметр треугольника', a * 3)

print('Периметр квадрата', b * 4)

if a * 3 == b * 4:

   print('Периметры равны')

elif a * 3 > b * 4:

   print('Периметр треугольника больше, чем периметр квадрата')

elif a * 3 < b * 4:

   print('Периметр квадрата больше, чем периметр треугольника')

3:

a = int(input())  

b = int(input())

c = int(input())

print('MAX=', max(a, b, c), sep='')

4:

m = int(input())

t = int(input())

if m > t:

   print('У Маринки больше яблок. Тарасу нужно дать ещё', m - t, 'ябл.')

elif m < t:

  print('У Тараса больше яблок. Маринке нужно дать ещё', t - m, 'ябл.')

elif m == t:

   print('Количество яблок равно.')

Объяснение:

извини, украинский не знаю, думаю сам изменишь, если нужно