> restart;
> print(`output redirected...`); # input placeholder
> d := 0.1e-1;
> print(`output redirected...`); # input placeholder
                                    0.01
> ;
> print(`output redirected...`); # input placeholder
> P := 14;
> print(`output redirected...`); # input placeholder
                                     14
                                    NULL
> t0 := .7;
> print(`output redirected...`); # input placeholder
                                     0.7
                                    NULL
> l := 2.0;
> print(`output redirected...`); # input placeholder
                                     2.0
                                    NULL
> lк := 60;
> print(`output redirected...`); # input placeholder
                                     60
                                    NULL
> lв := 2;
> print(`output redirected...`); # input placeholder
                                      2
                                    NULL
> print(??); # input placeholder

> Uл := .22;
> print(`output redirected...`); # input placeholder
                                    0.22
                                    NULL

> psi := 1.3;
> print(`output redirected...`); # input placeholder
                                     1.3
                                    NULL
> b := 0.2e-1;
> print(`output redirected...`); # input placeholder
                                    0.02
> NULL;
> Pизм := 40;
> print(`output redirected...`); # input placeholder
                                     40
> ;
> Iз := (1/350)*Uл*(35*lк+lв);
> print(`output redirected...`); # input placeholder
                                 1.321257143
> NULL;
> if Uл <= 380 then Rз := 4 else Rз := 125/Iз end if;
> print(`output redirected...`); # input placeholder
                                      4
> evalf(Rз);
> print(`output redirected...`); # input placeholder
                                     4.
                                    NULL
> 
> Pp := Pизм*psi;
> print(`output redirected...`); # input placeholder
                                    52.0
                                    NULL
> Rовс := Pp*(ln(2*l/d)+(1/2)*ln((4*(t0+(1/2)*l)+l)/(4*(t0+(1/2)*l)-l)))/(2*Pi*l);
> print(`output redirected...`); # input placeholder
                                 81.82892180
                                 -----------
                                     Pi     
> evalf(Rовс);
> print(`output redirected...`); # input placeholder
                                 26.04695478
                                    NULL
> nприб := round(Rовс/Rз);
> print(`output redirected...`); # input placeholder
                                      7
> evalf(nприб);
> print(`output redirected...`); # input placeholder
                                     7.
                                    NULL
> a := P/nприб;
> print(`output redirected...`); # input placeholder
                                      2
> evalf(a);
> print(`output redirected...`); # input placeholder
                                     2.




> evalf(a/l);
> print(`output redirected...`); # input placeholder
                                 1.000000000
> nиз := .65;
> print(`output redirected...`); # input placeholder
                                    0.65
> ;
> nз := round(Rовс/(nиз*Rз));
> print(`output redirected...`); # input placeholder
                                     10
> evalf(nз);
> print(`output redirected...`); # input placeholder
                                     10.
> NULL;
> if nз > 20 then l1 := P else l1 := a*(nз-1) end if;
> print(`output redirected...`); # input placeholder
                                     18
> evalf(l1);
> print(`output redirected...`); # input placeholder
                                     18.
> NULL;
> print(`output redirected...`); # input placeholder
                                    NULL
> Rпол := Pp*ln(2*l1^2/(b*t0))/(2*Pi*l1);
> print(`output redirected...`); # input placeholder
                                 15.51707250
                                 -----------
                                     Pi     
> evalf(Rпол);
> print(`output redirected...`); # input placeholder
                                 4.939237580

> a1 := P/nз;
> print(`output redirected...`); # input placeholder
                                      7
                                      -
                                      5
> evalf(a1);
> print(`output redirected...`); # input placeholder
                                 1.400000000
> evalf(round(a1/l));
> print(`output redirected...`); # input placeholder
                                     1.
> NULL;
> nип := .62;
> print(`output redirected...`); # input placeholder
                                    0.62

> Rпол1 := Rпол/nип;
> print(`output redirected...`); # input placeholder
                                 25.02753629
                                 -----------
                                     Pi     
> evalf(Rпол1);
> print(`output redirected...`); # input placeholder
                                 7.966512226
                                    NULL
> RполОВС := Rпол1*Rз/(Rпол1-Rз);
> print(`output redirected...`); # input placeholder
                                100.1101452     
                            --------------------
                               /25.02753629    \
                            Pi |----------- - 4|
                               \    Pi         /
> evalf(RполОВС);
> print(`output redirected...`); # input placeholder
                                 8.033770502
                                    NULL
> nз2 := Rовс/(RполОВС*nиз);
> print(`output redirected...`); # input placeholder
                          31.47266222              
                          ----------- - 5.030085560
                              Pi                   
> evalf(Rовс);
> print(`output redirected...`); # input placeholder
                                 26.04695478
> evalf(RполОВС);
> print(`output redirected...`); # input placeholder
                                 8.033770502
> nиз;
> print(`output redirected...`); # input placeholder
                                    0.65
> NULL;
> trunc(evalf(nз2));
> print(`output redirected...`); # input placeholder
                                      4