（求助）
pascal吧
全部回复
仅看楼主
level 5
一叠情 楼主
这个球出来是不是：
从七张扑克牌中任取三张，有几种组合方法？
2014年09月21日 06点09分 1
level 7
Dust💦
能不能用copy to windows 来发啊，我们抄着累
题目发上来
2014年09月21日 11点09分 2
Dust💦
@fp4869
2014年09月21日 11点09分
level 7
Dust💦
源代码：
program b4;
var
a,b,c,d:integer;
begin
d:=0;
for a:=1 to 7 do
if a=b then d:=d+0 else
for c:=1 to 7 do
if (b=c) or (a=c) then d:=d+0 else d:=d+1;
write(d);
end.
2014年09月21日 11点09分 3
level 3
59sts
对了吧。
2014年09月21日 13点09分 4
59sts
复制下来的代码少了一行
2014年09月21日 13点09分
猎火电脑工作室
头像好炫酷[惊哭]
2014年09月22日 10点09分
1