Wde не работает, так что не проверял..
var n,x,s,i:integer;
begin
readln(n); // считываем n
for i:= 1 to n do begin
readln(x); // читаем одно из n чисел
s:=s+x; // добавляем к сумме
end;
writeln(s);
end.
Число - кол-во цифр, индекс у этого числа - цифра
186₄ / 4₄ = 46 × 2₇ + 2₄ = 92₇ + 2₄
92₇ / 3₇ + 2₄ = 30₄ + 2₇ + 2₄ = 32₄ + 2₇
32₄ / 4₄ + 2₇ = 8 ₓ 2₇ + 2₇ = 18₇
Делим до тех пор, пока не будет 4₄
777 777 777 777 777 777
4 4 4 4 777 777
77 777 777
777 777 77
4477
Если у Марии было 3 собаки, то сколько их стало, когда Мария отдала 1 собаку Маше?