Нашли или выдавили из себя код, который нельзя назвать нормальным,
на который без улыбки не взглянешь?
Не торопитесь его удалять или рефакторить, — запостите его на
говнокод.ру, посмеёмся вместе!
' Program DISKRIMINANT
CLS
DO
PRINT "Vvedite peremennye"
INPUT "A"; A
INPUT "B"; B
INPUT "C"; C
D = B ^ 2 - 4 * A * C
CLS
PRINT "A ="; A
PRINT "B ="; B
PRINT "C ="; C
IF A = 0 THEN
CLS
WRITE "Urovnenie ne kvadratnoe"
WRITE "Ekstrenaja ostanovka programmy"
WRITE "Zavershenie raboty"
SLEEP 3
SYSTEM
END
END IF
PRINT "DISKRIMINANT ="; D
Dx = SQR(D)
P$ = "Pechal"
IF D > 0 THEN PRINT "x1 ="; ((0 - B) + Dx) / (2 * A), "x2="; ((0 - B) - Dx) / (2 * A)
IF D = 0 THEN PRINT "x ="; (0 - B) / (2 * A)
IF D < 0 THEN PRINT P$
INPUT "Rerty(YES = 1; NO = 2)"; CLr
IF CLr = 1 THEN CLS
LOOP WHILE CLr = 1
IF CLr = 2 THEN SYSTEM
END
Один из согруппников накодиль :D
Ну я свиснул тихонька. Удивлению не была границ :D
Гугловский переводчик... а просклонять языки так и не пoлучилось... "с языка: английский" "на: русский". Вот почему в первой колонке нельзя было "с: английского"? Pechal?
ЛолЪ 😀
:3
Ай малаца, даже хост подсветил.
Кстати первый по запросу IT+IS+A+BASIC+HURRY+GET+IN+THE+CAR в гоогле вылазит сам этот коммент на говнокод.ру.
Из окна видно даль,
Так откуда взялась
P$