delphiÊý×éÓù»·Êä³öÎÊÌ⣿
ÎÒʼÖÕ²»Ã÷°×ËüµÄÒâ˼?
Delphi(Pascal) code:
program Project2;
{$APPTYPE CONSOLE}
const
n=10;
type
intarray=array[1..n]of integer;
var
a:intarray;
i:integer;
begin
for i:=1 to n do
a[i]:=i;
for i:=1 to n do
begin
write(a[i]:4); //Õâ¸öðºÅÆðʲô×÷ÓÃ?ΪʲôҪ4£¿
if(i mod 5=0)then //Èç¹û±äÁ¿³ý5µÈÓÚ0Ϊ¼Ù,ËùÒÔÖ´ÐÐÏÂÃæÕâÌõÓï¾ä?ÊÇÕâÑùµÄÂð?
writeln;
end;
readln;
end.
write(a[i]:4); //Õâ¸öðºÅÆðʲô×÷ÓÃ?ΪʲôҪ4£¿
:4ΪÊä³ö¸ñʽ,±íʾ¿í¶È(²»×ãÓÿոñ)
if(i mod 5=0)then //Èç¹û±äÁ¿³ý5µÈÓÚ0Ϊ¼Ù,ËùÒÔÖ´ÐÐÏÂÃæÕâÌõÓï¾ä?ÊÇÕâÑùµÄÂð?
mod²»Êdzý,ÊÇÈ¡Óà,ÉÏÃæ±íʾÈç¹ûi¿ÉÒÔ±»5Õû³ý,ÔòÖ´ÐÐÏÂÃæµÄÓï¾ä
-------------------------------
Ïà¹ØÎÊ´ð£º
ÒÑÖªPython ÖУº
s = unicode("²âÊÔ", "gb2312")
s = u'\u6d4b\u8bd5'
print s
²âÊÔ
ÔÚDelphiÀïÃæÈçºÎ½«\u6d4b\u8bd5ÕâÑùµÄ»¹Ô³ÉGb2312µÄºº×ÖÄØ£¿
ÕÒµ½¸ö·½·¨
......
ÕâÓïÑÔºÃÄѰ¡ ѧdelphi¼òµ¥ ¿Þ
Ò»¸ödll ºÍÒ»¸ö Ö¸Õ뺯Êýµ÷Óà ¸ãÁËÎÒ2Àñ°Ý »¹ÊÇÔÚÎÒÓÐdelphi»ù´¡µÄÇé¿öÏ ¿Þ
ÄÑ¶È ±È delphi ¸ßºÜ¶à¡£¼ÌÐøÅ¬Á¦Ñ§°¡¡£
ºÃÏñÒ²²¢²»±ÈdelphiÄѶàÉÙ°É
Ö÷Òª´úÂë ²»Ö±¹ÛÁË¡ ......
×ÜÖ®£¬Õâ¸öÓ¦¸ÃÊǸöСBUG¡£
Ëæ±ã½¨¸ötxtÎĵµ
µÚÒ»ÐÐ68¸ös¼ÓÒ»¸ö»Ø³µ
µÚ¶þÐÐ98¸ös¼ÓÒ»¸ö»Ø³µ
µÚÈýÐÐ17¸ös¼ÓÒ»¸ö»Ø³µ
×ܹ²183¸ös¼ÓÈý¸ö»»ÐУ¬´óС189×Ö½Ú¡£
½Ó×ÅÓÃFileOpenºÍFileRead°ÑÎļþ ......