дано трехзначное число,составьте программку. с помощью которой обусловьте сумму квадратов цифр

Необходимо трёхзначное число разбить на 3.Для этого нам необходимо 3 переменных, пусть это будет a,b,c.
Будем делать на образце числа 123, то есть n:=123.
Чтоб выделить единицу пишем это a:=n div 100;
Сейчас выделяем двойку b:=(n div 10) mod 10;
Тройку c:=n mod 10.
Сейчас фактически сама сумма, берём ещё одну переменную, пусть будет sum. sum:=a*a +b*b+c*c;
Ну а далее просто выводи sum,размышляю знаешь как)