перенос программы в процедуры

Используя условия вариантов лабораторной работы № 9(Л.р. 9 Определить общую массу холодного воздуха, проникающего в здание через вход, по формуле Gвх=0.9j_вх F_дв τ_э N, где j_вх – удельный поток холодного воздуха, кг/(с*м2), через 1 м2 открытого проема наружной входной двери; F_дв – площадь одной открываемой створки дверей входа, м2; τ_э - эквивалентное по воздухопроницанию время открывание дверей, с, принять 1,1 с; N – число людей проходящих через вход в течение 1ч, принять 1000. Удельный поток холодного воздуха определяется по формуле j_вх=μ_вх √(2ρ_н ∆p_вх ) , здесь μ_вх – коэффициент расхода воздуха во входе, принять 0,46; ρ_н – плотность наружного воздуха, кг/м3, принять 1,48 кг/м3. Расчетная разность давления ∆p_вх , Па, на уровне середины высоты входных дверей при сбалансированном действии вентиляции в здании составит ∆p_вх=0,5g(h_зд+2h_эт-h_дв )(ρ_н-ρ_в), где g – ускорение свободного падения 9,81 м/с2; h_зд - высота здания от поверхности земли до верха лестничной клетки, определить как h_зд=nh_эт ; n – количество этажей в здании, принять от 5 до 10 с шагом 1; h_эт – полная высота одного этажа, принять 3м; h_дв – высота створки входной двери, принять 2,5 м; ρ_в – плотность внутреннего воздуха, кг/м3, принять 1,21 кг/м3. Определение ∆p_вх записать в виде функции.) записать все вычисления, проводимые ранее в основной программе, а в виде процедуры. В основной программе предусмотреть только ввод начальных и вывод результатов на экран.

0

ребят помогите!!! а то точно такая же задача попалась