Теория и практика эффективного математического моделирования. Черный А.А. - 345 стр.

UptoLike

ВУЗ: 

ПГУ | Пенза

Составители: 

Рубрика: 

345
writeln('Коэффициенты ортогонализации');
writeln(F0,'Коэффициенты ортогонализации');
writeln('V2=',V2,' U2=',U2,' Q2=',Q2);
writeln('I2=',I2,' M2=',M2,' F2=',F2);
writeln('G2=',G2,' H2=',H2,' K2=',K2);
writeln('L2=',L2);
writeln(F0,'V2=',V2,' U2=',U2,' Q2=',Q2);
writeln(F0,'I2=',I2,' M2=',M2,' F2=',F2);
writeln(F0,'G2=',G2,' H2=',H2,' K2=',K2);
writeln(F0,'L2=',L2);
end;
3: begin
VVOD31;
GB3660(A1,E1,B1,J1,O1,V1,U1,Q1);
writeln('Коэффициенты ортогонализации');
writeln(F0,'Коэффициенты ортогонализации');
writeln('V1=',V1,' U1=',U1,' Q1=',Q1);
writeln(F0,'V1=',V1,' U1=',U1,' Q1=',Q1);
end;
12:begin
VVOD31;
GB3660(A1,E1,B1,J1,O1,V1,U1,Q1);
writeln('Коэффициенты ортогонализации');
writeln(F0,'Коэффициенты ортогонализации');
writeln('V1=',V1,' U1=',U1,' Q1=',Q1);
writeln(F0,'V1=',V1,' U1=',U1,' Q1=',Q1);
VVOD42;
GB3710(A2,C2,D2,B2,J2,O2,P2,V2,U2,Q2,I2,M2,F2);
writeln('Коэффициенты ортогонализации');
writeln(F0,'Коэффициенты ортогонализации');
writeln('V2=',V2,' U2=',U2,' Q2=',Q2);
writeln('I2=',I2,' M2=',M2,' F2=',F2);
writeln(F0,'V2=',V2,' U2=',U2,' Q2=',Q2);
writeln(F0,'I2=',I2,' M2=',M2,' F2=',F2);
end;
9: begin
VVOD31;
GB3660(A1,E1,B1,J1,O1,V1,U1,Q1);
writeln('Коэффициенты ортогонализации');
writeln(F0,'Коэффициенты ортогонализации');
writeln('V1=',V1,' U1=',U1,' Q1=',Q1);
writeln(F0,'V1=',V1,' U1=',U1,' Q1=',Q1);
VVOD32;
GB3660(A2,E2,B2,J2,O2,V2,U2,Q2);
writeln('Коэффициенты ортогонализации');
writeln(F0,'Коэффициенты ортогонализации');
writeln('V2=',V2,' U2=',U2,' Q2=',Q2);
writeln(F0,'V2=',V2,' U2=',U2,' Q2=',Q2);
end;
27:begin
VVOD31;
GB3660(A1,E1,B1,J1,O1,V1,U1,Q1);
writeln('Коэффициенты ортогонализации');
writeln(F0,'Коэффициенты ортогонализации');
writeln('V1=',V1,' U1=',U1,' Q1=',Q1);
writeln(F0,'V1=',V1,' U1=',U1,' Q1=',Q1);
VVOD32;
GB3660(A2,E2,B2,J2,O2,V2,U2,Q2); 
     writeln('Коэффициенты ортогонализации');
     writeln(F0,'Коэффициенты ортогонализации');
     writeln('V2=',V2,' U2=',U2,' Q2=',Q2);
     writeln('I2=',I2,' M2=',M2,' F2=',F2);
     writeln('G2=',G2,' H2=',H2,' K2=',K2);
     writeln('L2=',L2);
     writeln(F0,'V2=',V2,' U2=',U2,' Q2=',Q2);
     writeln(F0,'I2=',I2,' M2=',M2,' F2=',F2);
     writeln(F0,'G2=',G2,' H2=',H2,' K2=',K2);
     writeln(F0,'L2=',L2);
   end;
3: begin
     VVOD31;
     GB3660(A1,E1,B1,J1,O1,V1,U1,Q1);
     writeln('Коэффициенты ортогонализации');
     writeln(F0,'Коэффициенты ортогонализации');
     writeln('V1=',V1,' U1=',U1,' Q1=',Q1);
     writeln(F0,'V1=',V1,' U1=',U1,' Q1=',Q1);
   end;
12:begin
     VVOD31;
     GB3660(A1,E1,B1,J1,O1,V1,U1,Q1);
     writeln('Коэффициенты ортогонализации');
     writeln(F0,'Коэффициенты ортогонализации');
     writeln('V1=',V1,' U1=',U1,' Q1=',Q1);
     writeln(F0,'V1=',V1,' U1=',U1,' Q1=',Q1);
     VVOD42;
     GB3710(A2,C2,D2,B2,J2,O2,P2,V2,U2,Q2,I2,M2,F2);
     writeln('Коэффициенты ортогонализации');
     writeln(F0,'Коэффициенты ортогонализации');
     writeln('V2=',V2,' U2=',U2,' Q2=',Q2);
     writeln('I2=',I2,' M2=',M2,' F2=',F2);
     writeln(F0,'V2=',V2,' U2=',U2,' Q2=',Q2);
     writeln(F0,'I2=',I2,' M2=',M2,' F2=',F2);
   end;
9: begin
     VVOD31;
     GB3660(A1,E1,B1,J1,O1,V1,U1,Q1);
     writeln('Коэффициенты ортогонализации');
     writeln(F0,'Коэффициенты ортогонализации');
     writeln('V1=',V1,' U1=',U1,' Q1=',Q1);
     writeln(F0,'V1=',V1,' U1=',U1,' Q1=',Q1);
     VVOD32;
     GB3660(A2,E2,B2,J2,O2,V2,U2,Q2);
     writeln('Коэффициенты ортогонализации');
     writeln(F0,'Коэффициенты ортогонализации');
     writeln('V2=',V2,' U2=',U2,' Q2=',Q2);
     writeln(F0,'V2=',V2,' U2=',U2,' Q2=',Q2);
   end;
27:begin
     VVOD31;
     GB3660(A1,E1,B1,J1,O1,V1,U1,Q1);
     writeln('Коэффициенты ортогонализации');
     writeln(F0,'Коэффициенты ортогонализации');
     writeln('V1=',V1,' U1=',U1,' Q1=',Q1);
     writeln(F0,'V1=',V1,' U1=',U1,' Q1=',Q1);
     VVOD32;
     GB3660(A2,E2,B2,J2,O2,V2,U2,Q2);




                                345

Страницы