uses GraphABC;
var
x : integer := 50; // x координата верхнего левого угла
y : integer := 50; // y координата верхнего левого угла
d : integer := 100; // длина прямоугольника
a : integer := 100; // ширина прямоугольника
points : array of point := new Point[5];
begin
SetPenColor(clBlack);
SetBrushColor(clRed);
Line(x, y+d, x, y);
points[0] := (x, y);
points[1] := (x+a, y);
points[2] := (round(a/4)*3+x, round(d/4)+y);
points[3] := (x+a, round(d/2)+y);
points[4] := (x, round(d/2)+y);
Polygon(points);
end.
P=a+b+c
a мы щитаем как один нужно 4 раза умножить
а*a*a*a=4
b*b*b*=3
c*c*c*c*c=5
Ответ:
Хочу вам сказать у каждого разных способ обучения учеников у меня в школе 2 учителя информатики один преподаёт Пайтон, а другой нет.
(2) 101111000
(8) 570
(16) 178
100 Кбайт ---> 1минута=60 секунд
F=36*100/60=6*10=60 Кбайт
ответ 60 Кбайт