Прям! чтобы украсить класс к 1 сентября, даша и саша вырезали из бумаги фигуры: осенний лист, цветок и звезду. зная, что у них была только жёлтая и оранжевая бумага, посчитай, сколько получится разных вариантов фигур из бумаги?
var i: word; //Было предпочтительнее использовать byte, //ведь от 3 до 7 считаем, но тип word старее, //а к byte могут придраться
begin SetBrushColor(clBlue); //Проставляем цвет кисти, я не //нашёл функции рисования круга, //где можно было бы указать цвет for i := 3 to 7 do begin FillCircle(200, 200, 10 * i); //Рисуем круг, радиус от 30 до 70 sleep(500); //Поскольку круги в конечном счёте всё равно //затираются более большими, будем выводить //с задержкой end; end.
Осенний лист желтый + оранжевый = 2. Цветок желтый + оранжевый = 2. Звезда желтая + оранжевая = 2. А комбинаций из трех разных фигур 8. N=2^i, 2^3=8.