Школоло / Говнокод #10585 Ссылка на оригинал

0

  1. 1
  2. 2
  3. 3
  4. 4
  5. 5
  6. 6
  7. 7
  8. 8
  9. 9
  10. 10
  11. 11
  12. 12
  13. 13
  14. 14
  15. 15
  16. 16
  17. 17
  18. 18
  19. 19
  20. 20
  21. 21
  22. 22
  23. 23
  24. 24
  25. 25
  26. 26
  27. 27
  28. 28
  29. 29
  30. 30
  31. 31
  32. 32
case NumberOfRegionalProblem of
    1:begin
        for i:=0 to N-1 do
          begin
            Mt[0,M+2]:=Fmu1(s[i+1,0].t);
            Mt[M+1,M+2]:=Fmu2(s[i+1,0].t);
            for j:=1 to M do
              Mt[j,M+2]:=sqr(h)*(Y[i,j]+tau*FF(S[i,j].x,S[i,j].t));
            progon(Mt,M,Y[i+1]);
          end;
      end;
    2:begin
        for i:=0 to N-1 do
          begin
            Mt[0,M+2]:=Fmu1(s[i+1,0].t);
            Mt[M+1,M+2]:=Fmu2(s[i+1,0].t);
            for j:=1 to M do
              Mt[j,M+2]:=sqr(h)*(Y[i,j]+tau*FF(S[i,j].x,S[i,j].t));
            progon(Mt,M,Y[i+1]);
          end;
      end;
    3:begin
        for i:=0 to N-1 do
          begin
            Mt[0,M+2]:=Fmu1(s[i+1,0].t);
            Mt[M+1,M+2]:=Fmu2(s[i+1,0].t);
            for j:=1 to M do
              Mt[j,M+2]:=sqr(h)*(Y[i,j]+tau*FF(S[i,j].x,S[i,j].t));
            progon(Mt,M,Y[i+1]);
          end;
      end;
  end;

Автор наркоман наверное, хз даже... :(

Запостил: SkuII SkuII, (Updated )

Комментарии (8) RSS

Добавить комментарий

Из-за тебя ушел bormand, guest!

    А не использовать ли нам bbcode?


    8