Алгебрологическое програмирование 1/2(a+b)h
Алгебрологическое програмирование 1/2(a+b)h
Гость
Ответ(ы) на вопрос:
Гость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.
Не нашли ответ?
Похожие вопросы