1. Составить программу вычисления площади круга: S = π ⋅ R 2. Составить программу вычисления площади треугольника: S =1/2 ⋅ A ⋅ H 1) выделить целую часть результата; 2) выделить дробную часть результата; 3) получить целый остаток от деления; 4) округлить результат 5) округлить до целого, не превосходящего результат. 3. Составить программу вычисления выражения: Y=Sin(a+b/2) при a=15, b=30 (градусов).

Program AB;

Var a,h,S:real;

Begin

readln(a,h);

S:=(a*h)/2;

writeln (S);

End.

Если а и h целые числа, то можно написать Var a,h:integer;

S: real;