不是VIP会员,不能显示答案

题目解答

题目:
var a, b: array[0..2] of integer; i, j, tmp: integer;
begin
for i := 0 to 2 do read(b[i]);
for i := 0 to 2 do begin
a[i] := 0;
for j := 0 to i do begin
inc(a[i], b[j]); inc(b[a[i] mod 3], a[j]);
end;
end;
tmp := 1;
for i := 0 to 2 do begin
a[i]:= a[i] mod 10; b[i]:= b[i] mod 10;tmp:= tmp* (a[i] + b[i])
end;
writeln(tmp);
end.
输入:2 3 5
输出:416
考点:
分析:
解答:
评论:
老师: