Создать программу для вычисления площади прямоугольника ( если а> б) или площади треугольника (если б> а) паскаль
program HelloWorld;
var a,b: double;
begin
writeln('Укажите A:');
readln(a);
writeln('Укажите B:');
readln(b);
if(a>b) then
//вычисляем площадь прямоугольника
end;
if(a begin
//вычисляем площадь треугольника
end.