Uses GraphABC;
begin
Window.Height:=600;
Window.Width:=800;
var y:=10;
while y<Window.Height do begin
Line(10,y,790,y);
y+=10
end;
var x:=10;
while x<Window.Width do begin
Line(x,10,x,590);
x+=10
end;
Randomize;
Pen.Color:=clRed;
Pen.Width:=3;
x:=Window.Width div 2;
x:=10*Round(x/10);
y:=Window.Height div 2;
y:=10*Round(y/10);
MoveTo(x,y);
repeat
case Random(1,4) of
1:LineTo(PenX+10,PenY);
2:LineTo(PenX,PenY-10);
3:LineTo(PenX-10,PenY);
4:LineTo(PenX,PenY+10);
end;
Sleep(100);
until false;
end.
50. 10 01 10 00 11, следовательно наибольшее число подряд идуих нулей - 3.
51. 3) АИНГЧАН
55-56. на фотографиях
1, 5*100 = 500 бит
2, 2048/1024 = 2 Мб
3, 5*8 = 40
Для виконання обчислень у програмі Excel використовують формули. Формули нагадують рецепти. їх можна складати самим або ж використовувати готові. Формула - це короткий запис послідовності дій, яка дає конкретний результат. Написавши певну формулу, Ви визначаєте порядок виконання дій.
Порядок виконання операцій записують за допомогою операторів. Але для отримання конкретного результату необхідно підставити в формулу конкретні значення величин, які до неї входять. Значення - це числа, дати, час, текст.