Question

напишите оператор присваивания в результате выполнения которого целой переменной S присвоится значение суммы цифр трёхзначного целого числа k

Answer 1

S:=(k div 100) + ((k mod 100) div 10)+(k mod 10);