Как можно вычислить сумму цифр четырёхзначного числа с помощью языка программирования Pascal?

Информатика 7 класс Программирование на Pascal Новый