神舟九号飞船（以下简称神九）（计划发射中）是一艘载人宇宙飞船，是中国“神舟”号系列飞船之一。担负此次任务的飞行乘组将由3名航天员组成。神舟九号是中国的第一个宇宙实验室项目921-2计划的组成部分。根据任务计划，神舟九号飞船将于今年6月至8月择机发射，与在轨运行的天宫一号目标飞行器进行载人交会对接。航天员将进入天宫一号工作和生活，开展相关空间科学实验，在完成预定任务后返回地面。对接过程中，将实现航天员手控交会对接，全面验证交会对接技术。
神舟九号主要有以下职能：
第一，用做货运飞船。用于搭载水，食物，推进剂和试验设备。
第二，用做紧急逃生飞船（救生船）。
第三，进行载人空间对接。
神舟九号将搭载大量的物品进入太空进行空间实验，其中有两大问题需要同学们帮忙解决。
1、【物品身份识别】
为了提高装载物品的效率与准确性，科学家们采用了人工智能装载技术——机器通过对物品上的条码扫描来确定物品的身份，然后来确定是否需要装载。为了确保读入条码的无误，在条码后面增设了一位作为校验码。通过一系列计算之后若计算结果与末尾校验位上的数值相同即为读入条码准确，反之重读。
校验位计算公式方法如下：

（1）代码位置序号
代码位置序号是指包括校验码在内的，由右至左的顺序号（校验码的代码位置序号为1）。
（2）计算步骤
校验码的计算步骤如下：
a 从代码位置序号2开始，所有偶数位上的数字代码求和。
b 将步骤a的和乘以3。
c 从代码位置序号3开始，所有奇数位上的数字代码求和。
d 将步骤b与步骤c的结果相加。
e、用大于或等于步骤d所得结果且为10的最小整数倍的数减去步骤d所得结果即为所求校验码的值。
步 骤 举例说明（其中的X表示校验位的数字）
（1）自右向左顺序编号 位置序号 13 12 11 10 9 8 7 6 5 4 3 2 1
代码 9 7 8 7 5 6 4 0 0 1 4 5 X
（2）从序号2开始求出偶数位数字之和 5+1+0+6+7+7=26 ①
（3）①式中的结果26乘以3 26×3=78 ②
（4）从序号3开始求出奇数位数字之和 4+0+4+5+8+9=30 ③
（5）将②式和③式中的结果相加 78+30=108 ④
（6）用大于或等于④式中108且为10最小整数倍的数减去④式结果。即：110-108=2，其差即为所求校验码的值 校验码X=2
输入说明：输入13个数，为商品扫描器读入值，中间用空格隔开。
输出说明：第一行包含一个整数，表示校验位计算值。第二行输出true或false，表示商品扫描器读入是否正确。
【输入样例1】
9 7 8 7 5 6 4 0 0 1 4 5 2
【输出样例1】
2
true
【输入样例2】
9 7 8 7 5 6 4 0 0 1 4 5 3
【输出样例2】
2
false
请按上述说明将下列程序补充完整。

 var d:array[1..13] of 0..9;
i,s:integer;
begin
 for i:=13 downto 1 do read(d[i]);
 readln;
 for _____i:=2 to 13_______ do
  if i mod 2 =0 then s:= ____s+d[i]____;
  s:= _____s*3______;
  for i:=3 to 13 do if _____i mod 2<>0______ then s:=s+d[i];
  s:=s mod 10;
  if s<>0 then s:=10-s;
  writeln(s);
  if _____s=d[1]______ then write('true')
    else write('false');
end.