Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
0
Alg Root;
arg x, y;
Root = getRoot(x, y, 1);
end;
Sub getRoot;
arg x, y, r;
if Power(r, x) < y then
getRoot = getRoot(x, y, r + 1);
else
if Power(r, x) = y then
getRoot = r;
else
getRoot = r - 1;
end;
end;
end;
Sub Power;
arg x, y;
if 0 < y then
Power = x * Power(x, y - 1);
else
Power = 1;
end;
end;
Написал напитоне простой интерпретатор функционального языка из учебника по теоретическим основам информатики, давайте обсудим
https://hastebin.com/ocadegapuv.py
сам учебник, в котором описывается язык и семантика (глава про функциональные программы)
http://www.ict.edu.ru/ft/003627/lect1.pdf
В оп-коде пример программы, которую ему можно скормить
(вычисляет целую часть корня степени x из числа y).
Подскажите, для начала, как распознать и развернуть в цикл хвостовую рекурсию.
И если кто напитоне работает, этот код вообще котируется, или есть явное палево?
vistefan,
18 Января 2018
+7
http://miryanka.ru/frame.js
Интернет-магазин православной одежды Мирянка. Православный скрипт и конструкции вида
function ПреобразоватьМесяцИзСХислаВСтроку(Месяц)
loki90,
24 Марта 2016
−1
..........................
//ДА ЧТО ЗА ЧЕЛОВЕК... КТО ЭТОТ КОД ПИСАЛ?! ПУСТЬ ОН/ОНА БОЛЬШЕ НИКОГДА НЕ ПИШЕТ КОД, А ЧИСТИТ КАЛОШИ... 2К++ запросов - это что за нах?!
// если рефакторить гавно, получится гавно, но запахом получше. Гавна есть запах ли хорош?
if(!$smarty->is_cached('output.tpl', $template_key)){
$xml='<document>';
..........................Нашел на одном сайте, который делали очень давно и самые разные "программисты" )
AndreDev,
21 Октября 2015
+1
[\s\S]+?
3_14dar,
08 Сентября 2015
+5
float data1[16];
float data2[16];
for (unsigned i = 0; i < 4; ++i)
for (unsigned j = 0; j < 4; ++j)
*(data1 + 4 * i + j) = *(data2 + 4 * i + j);
jangolare,
26 Августа 2015
−161
CREATE TABLE [dbo].[Images](
[id] [int] IDENTITY(1,1) NOT NULL,
[category] [int] NOT NULL,
[tag] [nvarchar](16) NOT NULL,
[description] [nvarchar](128) NOT NULL,
[comment] [nvarchar](1024) NULL,
[code01] [nvarchar](max) NULL,
[code02] [nvarchar](max) NULL,
[code03] [nvarchar](max) NULL,
[code04] [nvarchar](max) NULL,
[code05] [nvarchar](max) NULL,
[code06] [nvarchar](max) NULL,
[code07] [nvarchar](max) NULL,
[code08] [nvarchar](max) NULL,
[code09] [nvarchar](max) NULL,
[code10] [nvarchar](max) NULL,
[code] AS (rtrim(((((((((((((((((((((((((((((rtrim(replace(replace(coalesce([code01],''),char((13)),' '),char((10)),' '))+char((13)))+char((10)))+rtrim(replace(replace(coalesce([code02],''),char((13)),' '),char((10)),' ')))+char((13)))+char((10)))+rtrim(replace(replace(coalesce([code03],''),char((13)),' '),char((10)),' ')))+char((13)))+char((10)))+rtrim(replace(replace(coalesce([code04],''),char((13)),' '),char((10)),' ')))+char((13)))+char((10)))+rtrim(replace(replace(coalesce([code05],''),char((13)),' '),char((10)),' ')))+char((13)))+char((10)))+rtrim(replace(replace(coalesce([code06],''),char((13)),' '),char((10)),' ')))+char((13)))+char((10)))+rtrim(replace(replace(coalesce([code07],''),char((13)),' '),char((10)),' ')))+char((13)))+char((10)))+rtrim(replace(replace(coalesce([code08],''),char((13)),' '),char((10)),' ')))+char((13)))+char((10)))+rtrim(replace(replace(coalesce([code09],''),char((13)),' '),char((10)),' ')))+char((13)))+char((10)))+rtrim(replace(replace(coalesce([code10],''),char((13)),' '),char((10)),' ')))+char((13)))+char((10))))
)10 нормальная форма (_*_)
drup,
28 Мая 2015
+153
if(!empty($this->aActions))
$sMenuItems = htmlspecialcharsbx(CAdminPopup::PhpToJavaScript($this->aActions));
?>
<tr class="adm-list-table-row<?=(isset($this->aFeatures["footer"]) && $this->aFeatures["footer"] == true? ' footer':'')?><?=$this->bEditMode?' adm-table-row-active' : ''?>"<?=($sMenuItems <> ""? ' oncontextmenu="return '.$sMenuItems.';"':'');?><?=($sDefAction <> ""? ' ondblclick="'.$sDefAction.'"'.(!empty($sDefTitle)? ' title="'.GetMessage("admin_lib_list_double_click").' '.$sDefTitle.'"':''):'')?>>
<?
if(count($this->pList->arActions)>0 || $this->pList->bCanBeEdited):
$check_id = RandString(5);
?>
<td class="adm-list-table-cell adm-list-table-checkbox adm-list-table-checkbox-hover<?=$this->bReadOnly? ' adm-list-table-checkbox-disabled':''?>"><input type="checkbox" class="adm-checkbox adm-designed-checkbox" name="ID[]" id="<?=$this->table_id."_".$this->id."_".$check_id;?>" value="<?=$this->id?>" autocomplete="off" title="<?=GetMessage("admin_lib_list_check")?>"<?=$this->bReadOnly? ' disabled="disabled"':''?><?=$this->bEditMode ? ' checked="checked" disabled="disabled"' : ''?> /><label class="adm-designed-checkbox-label adm-checkbox" for="<?=$this->table_id."_".$this->id."_".$check_id;?>"></label></td>
<?
endif;
if($this->pList->bShowActions):
if(!empty($this->aActions)):
?>
<td class="adm-list-table-cell adm-list-table-popup-block" onclick="BX.adminList.ShowMenu(this.firstChild, this.parentNode.oncontextmenu(), this.parentNode);"><div class="adm-list-table-popup" title="<?=GetMessage("admin_lib_list_actions_title")?>"></div></td>
<?
else:
?>
<td class="adm-list-table-cell"></td>
<?
endif;
endif;
bitrix
Лапша PHP кода, с подливкой из HTML. Присутствуют специи из альтернативного синтаксиса оператора if для шаблонов
memclutter,
29 Августа 2014
+156
$query_result = mysql_query("SELECT parking FROM `cat_info` WHERE is_sold = 0");
$numpark = array();
$numpark[2]=0;
$numpark[3]=0;
$numpark[5]=0;
$numpark[6]=0;
if($query_result)
{
while ($row = mysql_fetch_array($query_result))
{
switch ($row["parking"]){
case 2:
$numpark[2]++;
break;
case 3:
$numpark[3]++;
break;
case 5:
$numpark[5]++;
break;
case 6:
$numpark[6]++;
break;
}
}
}Этот код считает количество записей в таблице, в зависимости от числа в колонке parking.
bashtannik,
05 Августа 2014
+158
<?php
$month = date("m", strtotime($model->order->created));
if($month==01){
$month = "января";
}elseif($month==02){
$month = "февраля";
}elseif($month==03){
$month = "марта";
}elseif($month==04){
$month = "апреля";
}elseif($month==05){
$month = "мая";
}elseif($month==06){
$month = "июня";
}elseif($month==07){
$month = "июля";
}elseif($month==08){
$month = "августа";
}elseif($month==09){
$month = "сентября";
}elseif($month==10){
$month = "октября";
}elseif($month==11){
$month = "ноября";
}elseif($month==12){
$month = "декабря";
}
?>Это facepalm!
jonasas,
08 Апреля 2014
+140
$('img.avatar').attr("src", "http://upload.wikimedia.org/wikipedia/commons/a/a4/Human_penis_2_by_Yiyi1394.jpg")= http://prntscr.com/36l35i
gost,
03 Апреля 2014
Follow us!