Соберите программу на языке Паскаль. Вывести на экран сумму цифр целого числа m>1

3 носка,т.к. среди них точно есть пара(в числе 3 есть число 2)

2, 4, 8, 16 (двоичная (10000), четверичная (100), восьмеричная (20), шестнадцатеричная (10))

в ms excel по умолчанию числа выравниваются по правому краю, текст по левому

но при ручном форматировании можно выравнивать как угодно

var

i,s: integer;

begin

s: =0;

for i: =2 to 5 do

s: =s+i*i;

writeln(s);

end.