Алгебрологическое програмирование 1/2 (a+b) h

Question

Информатика

Эсмеральда

16 сентября, 05:19

Алгебрологическое програмирование 1/2 (a+b) h

+5

Ответы (1)

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

Павлюня · Answer 1

Program z10; Var a, b, h:integer; s:real; Begin write ('a = ') ; readln (a) ; write ('b = ') ; readln (b) ; write ('h = ') ; readln (h) ; s:=1/2 * (a+b) * h; writeln ('Ответ = ', s) ; End.