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

Question

Информатика

Леонидыч

11 мая, 16:13

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

+4

Ответы (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.