1. Список говнокодов пользователя KATAJIU3ATOP

    Всего: 5

  2. Python / Говнокод #7640

    −97

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    i = 0
    t = 12
    r = 0
    g = 0
    while r!=1:
    	i = i + 1
    	if t%i==0:
    		g = g + 1
    	if i==5000:
    		print t, ' - ',g
    		i, g = 0, 0
    		t = t + 1
    	if t==203:
    		r = 1

    Нахождение дилителей.

    Вот так-вот, человек видимо на любит юзать цикл for=)

    KATAJIU3ATOP, 24 Августа 2011

    Комментарии (4)
  3. Python / Говнокод #7467

    −99

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    T, b= 0, []
    While t!=10:
      If t!=6:
        Print ''Чётные числа''
        A = int(raw_input('>> '))
        B.append(a)
      If t!=500:
        Print 'не чётные'
        А = int(raw_input('>> '))
        B.append(a)
    
    #якобы условия для того чтоб ввод был как бы зеброй, четные, не чётные#

    KATAJIU3ATOP, 06 Августа 2011

    Комментарии (6)
  4. Pascal / Говнокод #7172

    +93

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    Label 1, 2;
    var
     M,n:integer;
     B:real;
    Begin
     Read(m,n);
     2:
     B:=m mod n;
     If b=0 then goto 1 else
    Begin
     M:=n; n:=b;
     Goto 2;
    End;
     1:
    Write(n);
    End.

    Кaк бэ прогрaммноe рeaлизaциё aлгоритмa Евклидa, нaхождeниe мaксимaльного дeлитeля двух чисeл, кaк-то тaк.

    KATAJIU3ATOP, 06 Июля 2011

    Комментарии (36)
  5. Куча / Говнокод #6550

    +147

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    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
    +++++++++++++
    ++++++++++++++++
    ++++++++++++++++
           +++++++++++++
    ++++++++++++++.++
    +++++++++++++++
           ++++++++++++.
    +++++++..++
    +.-------------------
    ----------------------------
    -----------------
           ---------------.+++
    ++++++++++++++++
    ++++++++++
           +++++++++++++
    +++++++++++++.+++
    +++++++++++++++
           ++++++.++
    +.------.--------.----------
    --------
    ----------------------------
    -----------------
    ----.-----------------------
    .

    Не говно код, но тем не мение.

    KATAJIU3ATOP, 04 Мая 2011

    Комментарии (10)
  6. Pascal / Говнокод #6524

    +123

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    var
     a,b,c:real;
    begin
     read(a,b,c);
     if a<b then
     If b>a then
     If b>c then
     If c<b then
     Write('max - ',b);
    if b<a then
     If a>b then
     If a>c then
     If c<a then
     Writae('max - ',a);
    if a<c then
     If c>a then
     If c>b then
     If c<b then
     Write('max - ',c);
    Readln;
    End.

    Нахождение максимального значения из 3 чисел, бля.

    KATAJIU3ATOP, 01 Мая 2011

    Комментарии (45)