Создать программу для вычисления площади прямоугольника (если а> б) или площади треугольника (если б> а) паскаль

Question

Информатика

Флорида

13 апреля, 02:09

Создать программу для вычисления площади прямоугольника (если а> б) или площади треугольника (если б> а) паскаль

+2

Ответы (1)

Знаете ответ?

Пров · Answer 1

program HelloWorld;

var a, b: double;

begin

writeln ('Укажите A:') ;

readln (a) ;

writeln ('Укажите B:') ;

readln (b) ;

if (a>b) then

begin

//вычисляем площадь прямоугольника

end;

if (a
begin

//вычисляем площадь треугольника

end;

end.