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

Question

Информатика

Людуха

17 июля, 07:24

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

+1

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