- 1
- 2
- 3
- 4
if (x>13)or(x<13)or(x=13) then begin writeln('введено невероное значение X');halt end else begin
//Расчёт уравнения
..........
end;
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+92
if (x>13)or(x<13)or(x=13) then begin writeln('введено невероное значение X');halt end else begin
//Расчёт уравнения
..........
end;
в лабе в студента увидел o_O
конечно он получил 2 за лабу
но ка пример какокода супер
This is obvious 17.08.2010 10:00 # +6
adli__82 17.08.2010 10:04 # −7
кста уравнения квадратного оно таки не решало
d=b*b-4*a*b (c)
This is obvious 17.08.2010 11:56 # +1
adli__82 17.08.2010 11:57 # 0
Я сейчас предподаватель. И ЭТО написал один из моих студентов.
This is obvious 17.08.2010 11:58 # 0
adli__82 17.08.2010 12:33 # 0
p.s. Сильно не критиковать, это учебный пример, в жизни было б меньше кода и замутов.
xXx_totalwar 17.08.2010 12:55 # +10
дальше не читал
не хватает еще {$Errors Off} {$Compile No}
adli__82 17.08.2010 13:37 # 0
ИМХО лично мне удобно.
xXx_totalwar 17.08.2010 13:41 # +3
а вот это B- все всем понятно
C+ ну и тут читаемость 100%
absolut 17.08.2010 13:46 # +2
Stalker 17.08.2010 13:53 # +1
kainwinterheart 18.08.2010 02:45 # +3
bugmenot 18.08.2010 17:08 # 0
eg: почему вы не хотите служить в армии, однако пишете {$C+,D+,L+,Y+} в сочетании с {$O+,W-}? :-P
xXx_totalwar 18.08.2010 17:13 # +2
да ну? все-все?
говно (даже 15 летней выдержки =) ) остается говном
bugmenot 20.08.2010 08:46 # +2
можно и в справочник слазить, заодно станет очевидно, что в той длинной личинке: 1 директива влияет на приведенный код, 4 существуют только для обратной совместимости и вообще ничего не должны менять. зато красиво отсортировано по алфавиту, да.
по мне, так всякое #pragma option push -bi -a8 и трубопаскакалевское {$Z4,A8} - равноуёбищны
Анонимус 20.08.2010 16:11 # +4
...
>>{$Warnings Off}
>>Var
A,B,C,D,X,X1,X2,Y:Extended;
Вы реально детей такому учите?
Govnoeb 19.09.2010 21:04 # 0
нет проверки на D < 0
X2 вообще нигде не выводится
в случае fabs(B) < epsilon и fabs(A) > epsilon будет выведен только один из корней (например x^2 -1)
нигде нет ни слова про кратность корней
итого:
неуд нумер адын
в жизни было б больше кода и замутов -> неуд нумер два
istem 20.09.2010 00:32 # +1
Lure Of Chaos 17.08.2010 10:44 # 0
inkanus-gray 17.08.2010 22:28 # +3
kainwinterheart 18.08.2010 02:47 # +1
bugmenot 18.08.2010 16:24 # +6
istem 20.09.2010 00:33 # 0
это - special black magic
KaBauHblu_nemyx 10.07.2019 08:26 # 0