Перевести код из Паскаля в С++.

[cristianoman]

Вобщем нужно найти площадь заштрихованой фигуры, тоесть найти площадь 6-угольника, потом треугольника, и от найденной площади 6-уг отнять площадь треугольника, и = площадь заштр.фигуры..
Тоесть вводишь 1 сторону, так как сторона тр = стороне шест = радиусу
Спасибо...

Program lab_1_2;
uses crt;
var a,r,S,S1,S2:real;
Begin
clrscr;
writeln('Vvedite storonu pravilnogo ShestiugolnikA');
readln(a);
r:=a;
S1:=2*sqrt(3)*(r*r);
S2:=(a*a)*(sqrt(3)/4);
S:=S1-S2;
writeln('Ploshad Figuri = ',S:4:2, ' S1=',S1:4:2, ' S2=',S2:4:2);
readln;
end.

[Abstraction]

S1:=2*sqrt(3)*(r*r);

Откуда взяли формулу?

[cristianoman]

Сообщение от Abstraction

Откуда взяли формулу?

http://ru.wikipedia.org/wiki/Правильный_шестиугольник
Там в площади...

[interacia]

Abstraction указывает на то что вы использовали формулу подсчета площади правильного шестиугольника по известному радиусу вписанной окружности.
Площадь правильного шестиугольника по известной стороне равна

(a*a)*(3*sqrt(3))/2.

Посмотрите на туже (http://ru.wikipedia.org/wiki/Правильный_шестиугольник) повнимательней.

Вычисление заштрихованной площади можно упростить

(a*a)*(5*sqrt(3))/4

[interacia]

#include <iostream>
#include <cmath>
using namespace::std;
void main(){
double a;
cout <<"Vvedite storonu pravilnogo ShestiugolnikA"<<endl;
cin>>a;
cout <<"Ploshad zashtrihovannoy oblasti ="<<a*a*5*sqrt(3.0)/4.0<<endl;
system("PAUSE");
}

Сразу вычисляем заштрихованную площадь.