В данный код, вставить 2 оператора FloodFill и SetFillStyle, благодаря которым можно закрасить части графика: >0 в коричневый, n*pi ; j:=(l/n);
for i:= 1 to n do
begin
q:=(i*j) ;
SetColor(brown);
str(i,f);
line(trunc(q+10),100,trunc(q+10),trunc(110));
OutTextXY(trunc(q+3+10),110,f);
OutTextXY(trunc(q+8+10),110,'.j');
end;
readln ;
readln
end.
ответ: 9
Объяснение:
X=1i=1While i<4:x=x*2i=i+1x=x+1Изначально X = 1, i = 1. Потом идет цикл, который умножает x на 2 и увеличивает i на 1, пока выполняется условие (i<4). Получается:
i=1 x=1 i<4?ДА => x = x*2 = 1*2 = 2 i = i+1 = 1+1 = 2
i=2 x=2 i<4?ДА => x = x*2 = 2*2 = 4 i = i+1 = 2+1 = 3
i=3 x=4 i<4?ДА => x = x*2 = 4*2 = 8 i = i+1 = 3+1 = 4
i=4 x=8 i<4?НЕТ => ВЫХОД
x = x+1 = 8+1 = 9