- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
- 12
- 13
- 14
- 15
- 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.
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+93
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к.
SmackMyBitchUp 06.07.2011 14:32 # +3
KATAJIU3ATOP 06.07.2011 14:34 # −2
SmackMyBitchUp 06.07.2011 14:53 # +1
KATAJIU3ATOP 06.07.2011 18:08 # −3
guest 06.07.2011 19:15 # −1
Отговорка же!
guest 06.07.2011 19:14 # +1
А можете представить нам аппаратную?
bugmenot 06.07.2011 19:19 # 0
kipar 06.07.2011 20:14 # 0
KATAJIU3ATOP 07.07.2011 10:14 # 0
3.14159265 07.07.2011 12:21 # −1
дальше не читал.
язык в котором нужно объявлять метки - уже плохо пахнет.
тем более, что это не отбивает желания у gotoбыдла.
Tronix 14.07.2011 09:11 # −1
ctm 15.07.2011 06:11 # 0
B:=m mod n;
If b=0 then goto 1 else
Begin
M:=n; n:=b;
Goto 2;
End;
неужели выглядит лучше чем:
while true do begin
B:=m mod n;
If b=0 then break;
M:=n; n:=b;
End;
SmackMyBitchUp 15.07.2011 08:34 # 0
B:=m mod n;
while b<>0 do begin
m:=n;
n:=B;
B:=m mod n;
end;
3.14159265 30.07.2011 18:41 # 0
...
>обойтись без меток нужно построить два-три вложенных цикла, добавить пару-тройку флагов и сломать мозг на условиях выхода из циклов. Когда можно было бы обойтись одной меткой.
пример в студию.
guest 31.07.2011 11:11 # −2
Tronix 31.07.2011 13:42 # 0
Tronix 31.07.2011 13:44 # 0
bugmenot 31.07.2011 15:03 # 0
guest 31.07.2011 17:33 # 0
ctm 07.07.2011 15:27 # +1
KATAJIU3ATOP 07.07.2011 22:57 # 0
SmackMyBitchUp 08.07.2011 00:13 # 0
KATAJIU3ATOP 08.07.2011 12:26 # +1
Lure Of Chaos 08.07.2011 15:39 # 0
вспомните троллинг вебкилла или мишустина
KATAJIU3ATOP 08.07.2011 16:38 # 0
Lure Of Chaos 08.07.2011 16:52 # +2
KATAJIU3ATOP 08.07.2011 16:55 # 0
Lure Of Chaos 08.07.2011 17:07 # 0
Lure Of Chaos 08.07.2011 15:36 # 0
как раз, считаю, что банить нужно именно комментирование. Мол, запостил хуйню - не сри в комментах. А запостил что-нибудь годное - ну, тогда вроде бы уважаемый человек.
Хотя это все попахивает кармадрочем.
3.14159265 08.07.2011 00:47 # 0
guest 08.07.2011 00:56 # −1
Яркий пример:
http://govnokod.ru/7097
ctm 08.07.2011 12:55 # 0
по "лабой" я понимаю очень убогий код, который делали скорее всего для сдачи лабы. На вскидку не могу предложить адекватный способ банов:(
Lure Of Chaos 08.07.2011 15:48 # +3
бл, прямо статья на лурк получилась
ctm 11.07.2011 12:01 # 0
Lure Of Chaos 07.07.2011 16:13 # +1
guest8 09.04.2019 11:08 # −999