Question

Вопрос по программированию pascal
1 Составить программу для вычисления площади и периметра трапеции, если стороны основания и высота вводится с клавиатуры.

Answer 1

Внимание! Если программа не работает, обновите версию PascalABC.NET !
begin

var (a,b):=readreal2('Введите стороны :');

var (c,d):=readreal2('Введите основания :');

var h:=readreal('Введите высоту :');

var S:=((c+d)/2)*h;

writeln('S=',S);

var P:=a+b+c+d;

writeln('P=',P);
end.