rubik-nerubik, юзай F1
функция ord возвращает из символа -его код
const объявление констант
line=Array потому что это Pascal
Longint [-2147483648..2147483647], signed 32-bit
функция chr возврает из кода -символ
str(a, s)- прототип Str(X [: Width [: Decimals ]]; var S)- забивает в строку число
sum(ss,s,ss) и где ты её описал? вижу только прототип