A = list()
i = 0
while 1:
A.append(int(input()))
if(i > 1):
last = A[i-1]
now = A[i]
if(last == 0 and now == 0):
break
i+= 1
summa = 0
for i in range(len(A)):
summa += A[i]
print(summa)
===== PascalABC.NET =====
begin
ReadSeqInteger('Введите 12 чисел', 12)
.Count(p -> p.InRange(-9, 9)).Println
end.
Begin
var pr:=1;
var a:integer:=readlninteger('Введите а:');
var b:integer:=readlninteger('Введите b:');
for a:=a to b do
if (a mod 4 =0) then pr*=a;
println(pr);
end.
У нас есть 3 возможности покрасить первое дерево: белый, синий, оранжевый. Далее у нас 2 возможности покрасить 2-е дерево: в не тот цвет, в который покрашено первое дерево. Для третьего дерева тоже 2 варианта и так далее до n. Значит согласно правилу умножения у нас всего 3*
вариантов