1000 fnF(x,n) 1010 local k,s 1020 s=0.0 1030 for k=0 to n for ʸ (�����֤�) �ϡ����Τ褦�� 1040 s=s+x^k �Ԥ�ʬ���ƽΤ����̤��� 1050 next for �� next �δ֤ϲ��Ԥ��äƤ�褤�� 1060 return(s)
�ؿ�̾�� fn �ǻϤޤ�褦�ˤ�����«�����֤��ͤ� return( ) ����˽�
�ؿ��������ǤΤȤ��ѿ���̿�� local ��������Ƥ��� (�������� ������줿�ѿ��� local �ѿ� (�ɽ��ѿ�) �Ȥ���)�� ��������ȡ��ץ�������¾����ʬ��Ʊ��̾�����ѿ���ȤäƤ����Ȥ��Ƥ⡤ ����Ȥ���Ȥ���ʪ�Ȥ��ư����롥
�ޤ��ؿ�������Ѥ����������ѿ�̾�ȡ��ºݤ˴ؿ���Ƥ֤Ȥ��ΰ������ѿ�̾ �Ȥ�Ʊ���Ǥʤ��Ƥ褤 (������äƤ�Τ��狼��ʤ����������顤���ä��ȼ� �������)��
���˼���Ū�������褦��