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

    Всего: 1

  2. Pascal / Говнокод #9180

    +107

    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
    25. 25
    26. 26
    27. 27
    28. 28
    29. 29
    30. 30
    31. 31
    32. 32
    33. 33
    34. 34
    35. 35
    36. 36
    37. 37
    38. 38
    39. 39
    40. 40
    begin
writeln('Enter 1st number');
readln(a);
writeln('Enter 2st number');
readln(b);
writeln('Enter 3st number');
readln(c);

if a = b then if a = c then if b = c then       ;
writeln('numbers are');

if a > b then if a = c then if b < c then
writeln('a Equally c and it is more b')         ;

if a = b then if a > c then if b > c then
writeln('a Equally b and it is more c')         ;

if a < b then if a < c then if b = c then
writeln('b Equally c and it is more a')         ;

if a > b then if a > c then if b > c then
writeln('a it is more ')                        ;
if a > b then if a > c then if b < c then
writeln('a it is more ')                        ;
if a > b then if a > c then if b = c then
writeln('a it is more ')                        ;

if a < b then if a = c then if b > c then
writeln('b it is more ')                        ;
if a < b then if a > c then if b > c then
writeln('b it is more ')                        ;
if a < b then if a < c then if b > c then
writeln('b it is more ')                        ;

if a = b then if a < c then if b < c then
writeln('c it is more ')                        ;
if a > b then if a < c then if b < c then
writeln('c it is more ')                        ;
if a < b then if a < c then if b < c then
writeln('c it is more ')                        ;

    Такое выдал один из моих учеников в 10м классе после того, как отказался учится рисовать блок-схемы и сказал, что сразу сможет писать. Задание заключалось в том, чтобы программа выводила большее из 3х введенных пользователем чисел.

    Rage, 20 Января 2012

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