Текущий архив: 2007.01.21;
Скачать: CL | DM;
Вниз
Какой ты программист? Тест Найти похожие ветки
← →
Zeqfreed © (2006-12-29 20:41) [40]
const
values : array[1..2] of Word = (2, 1);
i := values[i];
Вроде не было ещё?
← →
isasa © (2006-12-29 20:46) [41]Zeqfreed © (29.12.06 20:41) [40]
Было в оригинале
6. declare onetwo(2) fixed bin(31) init (2,1);
. . .
i=onetwo(i);
Да, старый стал. PL/1(PL/O), уже нюхом не узнаю ...
← →
Zeqfreed © (2006-12-29 20:48) [42]Там через ф-цию насколько я понимаю? :)
Это немножно другое.
← →
Gero © (2006-12-29 20:51) [43]> [42] Zeqfreed © (29.12.06 20:48)
> Там через ф-цию насколько я понимаю? :)
> Это немножно другое.
> [35] Sha © (29.12.06 14:50)
> const
> onetwo: array[1Դ] of integer= (2, 1);
> //#6
> i:=onetwo[i];
← →
Vendict © (2006-12-29 22:12) [44]kaif © (29.12.06 1:59) [22]
2) //экономное
i := i mod 2 + 1;
вот-вот, первое что пришло в голову. только к какому это пункту приписать ? 7 или 8... хотя были мысли о массиве и о аналогии i := 1 + Byte(i = 1) , только первый вариант материализовался.
← →
Vendict © (2006-12-29 22:18) [45]i := i mod 2 + 1;
кстати, этот вариант ещё учитывает, что i не будет равна 1 или 2. всё-таки к 7му ближе.
← →
XProger © (2006-12-29 23:10) [46]i := i shr 1 + 1
это как аналог
i := i mod 2 + 1
← →
tesseract © (2006-12-29 23:16) [47]
> i := i shr 1 + 1
i:= 1 shr 2-i;
← →
XProger © (2006-12-30 01:20) [48]tesseract, что оно делает?
← →
GrayFace © (2006-12-30 10:28) [49]> i:= (i div 2) + 2
Все равно что inc(i);
> i := i shr 1 + 1
i:=i;
> tesseract, что оно делает?
Оно делает i:=-i;
P.S. Я сделал 3-i. А вариант с xor"ом крут. Самый лучший.
← →
Anatoly Podgoretsky © (2006-12-30 17:48) [50]Он крут только для степеней двойки.
Страницы: 1 2 вся ветка
Текущий архив: 2007.01.21;
Скачать: CL | DM;
Память: 0.55 MB
Время: 0.054 c