±Û¾´ÀÌ: mengpa (½ÃƼÇåÅÍ)
³¯ Â¥: Sat Mar 21 20:06:54 1998
Á¦ ¸ñ: À¥ÆäÀÌÁö¿¡¼... Áú¹®ÀÔ´Ï´Ù.
±³¼ö´Ô²²¼ ¼Ò°³ÇϽŠÀ¥ÆäÀÌÁö¿¡¼¿ä...
¿¹ 1) ¸µÅ©¸¦ µû¶ó µé¾î°¡¸é,
¸Ç ¸¶Áö¸·¿¡ ³ª¿À´Â procedure¿¡¼¿ä...
# A useful procedure for #18.
mod5_14:=proc(x) local i;
for i from 1 to nops(x) do
if modp(x[i],5)<>1 and modp(x[i],5)<>4 then RETURN(false) fi;
od;
RETURN(true);
end:
select(mod5_14,partition(10));
À§¿¡¼ modp(x[i], 5)¸¦ Çϴµ¥,
x[i]µéÀº ¸®½ºÆ® ÇüÅÂÀÌÁö ¾Ê½À´Ï±î? modp ¿¬»êÀ» ÇÏ¸é ¾î¶»°Ô ¼öÇàµÇ´ÂÁö°¡
±Ã±ÝÇÕ´Ï´Ù. À§ÀÇ procedure¸¦ µ¹·Áº¸´Ï °á°ú°¡ ³ª¿À´Âµ¥...
¾ÆÂü, À¥¿¡¼ ¿Â¶óÀÎÀ¸·Î tutorialÀ̳ª, user's guide, ¶Ç´Â mannalÀ»
º¼ ¼ö ÀÖ´Â °÷Àº ¾ø½À´Ï±î? Ã¥ ±¸ÇϱⰡ Èûµé¾î¼¿ä...
-- ±ô