Известны данные о стоимости каждого товара из группы. найти общую стоимость трех товаров, которые стоят дороже 1000рублей (количество таких товаров неизвестно)

Var i,x,s: integer; begin writeln('вводите стоимость товаров по одному'); while i< 3 do   begin   readln(x);   if x> 1000 then     begin     s: =s+x;     i: =i+1;     end;   end; writeln('s=',s); end.

первую фигуру мы можем раскрасить в 6 цветов, вторую - в 5, третью- в 4, и т.д. а первую - в 3 цвета

6*5*4*3=360

ответ 360 способов

27: 2=13       \1 13: 2=6         \1 6: 2=3           \0 3: 2=1           \1                     \1. 27(10)=11011(2).