<u>// PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018</u>
<u>// Внимание! Если программа не работает, обновите версию!</u>
uses GraphABC;
begin
var (w,h):=(800,600); // размер графического окна
SetWindowSize(w,h);
var (xc,yc):=(w div 2,h div 2); // координаты центра
var R:=h-yc-20; // радиус описанной окружности
var n:=ReadInteger('Количество сторон n =');
Window.Clear;
Pen.Width:=5;
Pen.Color:=clRed;
var P:=new Point[n];
for var i:=0 to n-1 do begin
var arg:=2*Pi*i/n-Pi/2;
P[i].X:=Trunc(xc+R*cos(arg));
P[i].Y:=Trunc(yc+R*sin(arg))
end;
DrawPolygon(P);
end.
Python
1. x = [1,2,3,4,5,6,7,8,9,0] #Массив
print(x[:5])
print(x[5:])
2. x = [1,2,3,4,5,6] #Массив
print(x[::-1])
3. x = [0,1,2,3,4] #Массив
for i in range(1,len(x),2): print(x[i])
4. То же самое, что 3 программа, только 1 в range(...) заменить на 0
пы сы Хэштэг это комментарий в языке Python т.е. не исполняется
Дано:
K=512*256=131072
N=4096
Найти:
V-?
Решение:
V=K*I
I=log₂N
I=log₂4096=12 бит
V=131072*12=1572864 бит : 8=196608 байт : 1024=192 Кб
Ответ: 192 Кб
А, б,с - точки координат.
координаты записаны в двоичном коде, следовательно, а(11,111)=а(3,7)
б(1011,1010)=б(11,10)
в(10,110)=в(2,6)
Рисуешь систему координат, отмечаешь на ней эти три точки и соединяешь их. Получается треугольник