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

Question

Егор Ильинский

Информатика

3 апреля, 09:33

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

+5

Ответы (1)

Знаешь ответ на этот вопрос?

Есения Короткова · Answer 1

var a, b, c, d, e, p, s: real;

begin

writeln ('введите длину, ширину, высоту, а также боковые стороны');

readln (a, b, c, d, e);

s: = ((a+b) / 2) * c;

p: = a+b+d+e;

Writeln ('Площадь равна', s);

Write ('Периметр равен', p)

end.