Предыдущий уровень изложения текущего раздела   Текущий уровень изложения предыдущего раздела   Текущий уровень изложения следующего раздела   Первый уровень изложения следующего раздела   Уровень: Глоссарии:


СТРУКТУРА ПРОГРАММЫ

Пример записи простой программы, вычисляющей площадь треугольника по формуле Герона:

Program TRIANG;
var A, B, C, S, P: Real;
begin
 Read(A,B,C);
 WriteLn(A,B,C);
 P:=(A+B+C)/2;
 S:=Sqrt(P*(P-A)*(P-B)*(P-C));
 WriteLn('S=',S:8:3)
end.