Программирование на языке Турбо Паскаль
Здесь будет использована формула Герона: , где p – полупериметр треугольника, a, b, c – длины сторон. function Square(a,b,c: real): real
...работа с системным динамиком. Для включения звука нужна процедура Sound(f: word) (f — частота в герцах).