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)