для задач необходимо подключить библиотеку cmath, задачи решены на с++, надеюсь решения тебе
Объяснение:
a) int a, b, c, d; // a меньшее основание б большее . с д - боковые стороны
cin >> a >> b >> c >> d;
cout << a+b+c+d << endl;// периметр
cout << sqrt(c*c-((b-a)/2)*((b-a)/2))*(a+b)/2; // площадь
return 0;
b) int x1,y1, x2,y2;
cin >> x1 >> y1 >> x2 >> y2;
cout << sqrt((x2-x1)*(x2-x1)+(y2-y1)*(y2-y1));
return 0;
c)int x2,y2;
cin >> x2 >> y2;
if ( sqrt((x2-0)*(x2-0)+(y2-0)*(y2-0))>7)
cout << "YES";
else cout << "NO";
return 0;
d)int a[10],c=0;
for(int i=0; i<10;i++)
{cin >> a[i];
c+=abs(a[i]);}
cout << c/10;
return 0;
uses drawman;
Procedure w;
Begin
PenDown;
OnVector (0,-7);
OnVector (2,0);
OnVector (0,7);
PenUp;
OnVector (0,-7) ;
PenDown;
OnVector (2,0);
OnVector (0,7);
PenUp;
end;
procedure T;
Begin
PenDown;
OnVector (0,7);
OnVector (-2,0);
OnVector(4,0); penUp;
end;
procedure O;
Begin
PenDown;
OnVector (4,0);
OnVector (0,7);
OnVector (-4,0);
OnVector (0,-7);
PenUp;
end;
procedure R;
PenDown;
OnVector (0,7);
OnVector (4,0);
OnVector (0,-4);
OnVector (-4,0);
PenUp;
end;
procedure A;
begin
PenDown;
OnVector (2,7);
OnVector (2,-7);
PenUp;
OnVector (-3,3);
PenDown;
OnVector (2,0);
PenUp;
end;
begin
Field (32,10);
ToPoint (3,7); w;
OnVector (4,-7); T;
OnVector (2,-7); O;
OnVector (6,0); R;
OnVector (5,-3); A;
end.
Вроде работает