Помощь перевести из питона в паскаль

import math
 
s = input().split()
i = 0
res = 0
if s[0].isdigit():
    res = float(s[0])
    i = 1
elif s[0] == 'sin':
    res = math.sin(float(s[1]))
    i = 2
elif s[0] == 'cos':
    res = math.cos(float(s[1]))
    i = 2
elif s[0] == 'tg':
    res = math.tan(float(s[1]))
    i = 2
while i < len(s) and s[i] != '=':
    if s[i] == '+':
        if s[i + 1] == 'sin':
            res += math.sin(float(s[i + 2]))
            i += 3
        elif [i + 1] == 'cos':
            res += math.cos(float(s[i + 2]))
            i += 3
        elif [i + 1] == 'tan':
            res += math.tan(float(s[i + 2]))
            i += 3
        else:
            res += float(s[i + 1])
            i += 2
    elif s[i] == '-':
        if s[i + 1] == 'sin':
            res -= math.sin(float(s[i + 2]))
            i += 3
        elif [i + 1] == 'cos':
            res -= math.cos(float(s[i + 2]))
            i += 3
        elif [i + 1] == 'tan':
            res -= math.tan(float(s[i + 2]))
            i += 3
        else:
            res -= float(s[i + 1])
            i += 2
    elif s[i] == '*':
        if s[i + 1] == 'sin':
            res *= math.sin(float(s[i + 2]))
            i += 3
        elif [i + 1] == 'cos':
            res *= math.cos(float(s[i + 2]))
            i += 3
        elif [i + 1] == 'tan':
            res *= math.tan(float(s[i + 2]))
            i += 3
        else:
            res *= float(s[i + 1])
            i += 2
    elif s[i] == '/':
        if s[i + 1] == 'sin':
            res /= math.sin(float(s[i + 2]))
            i += 3
        elif [i + 1] == 'cos':
            res /= math.cos(float(s[i + 2]))
            i += 3
        elif [i + 1] == 'tan':
            res /= math.tan(float(s[i + 2]))
            i += 3
        else:
            res /= float(s[i + 1])
            i += 2
print(res)

from math import sin, cos, tan
from operator import add, sub, mul, truediv
 
def get_num(arr, nums):
    e = arr.pop(0)
    if e.isdigit():
        nums.append(float(e))
    else:
        tr_fun = None
        if e == 'sin'   :   tr_fun = sin
        elif e == 'cos' :   tr_fun = cos
        elif e == 'tg'  :   tr_fun = tan
        nums.append(tr_fun(float(arr.pop(0))))
 
def calculate(arr):
    nums = []
    ops = []
    while arr:
        get_num(arr, nums)
        ops.append(arr.pop(0))
    res = nums.pop(0)
    while ops:
        op = ops.pop(0)
        if op == '=':
            return res
        py_op = None
        if op == '+':       py_op = add
        elif op == '-':     py_op = sub
        elif op == '*':     py_op = mul
        elif op == '/':     py_op = truediv
        try:
            res = py_op(res, nums.pop(0))
        except:
            return 'Деление на 0.'
 
arr = input(f'Введите выражение, содержащее числа, "sin", "cos", "tg" и операции "+,-,*,/"->').split()
print(calculate(arr))

from math import sin, cos, tan
from operator import add, sub, mul, truediv
 
def get_num(arr, nums):
    e = arr.pop(0)
    if e.isdigit():
        nums.append(float(e))
    else:
        d = {'sin':sin, 'cos':cos, 'tg':tan}
        nums.append(d[e](float(arr.pop(0))))
 
def calculate(arr):
    nums = []
    ops = []
    while arr:
        get_num(arr, nums)
        ops.append(arr.pop(0))
    res = nums.pop(0)
    d = {'+':add, '-':sub, '*':mul, '/':truediv}
    while ops:
        op = ops.pop(0)
        if op == '=':
            return res
        try:
            res = d[op](res, nums.pop(0))
        except:
            return 'Деление на 0.'
 
print(f'Вводите выражения, содержащее числа, "sin", "cos", "tg", операции "+,-,*,/", и оканчивающиеся символом "=":')
print('Например: 12 + sin 13 * tg 98 = ')
arr = input('->').split()
print(calculate(arr))