uses HaromszogTest, crt;

var
	HaromszogTest1 : THaromszogTest;
begin
	HaromszogTest1 := THaromszogTest.Create();
	HaromszogTest1.testSzamitTerulet;

end.