主题：007bond快过来!
chyx
[专家分：450] 发布于 2007-07-24 08:02:00
怎样求绝对素数呀!?
回复列表 （共17个回复）
11 楼
Lovely哆啦 [专家分：1360] 发布于 2007-07-24 08:52:00
用子程序打印
*
**
***
****
…………
12 楼
Lovely哆啦 [专家分：1360] 发布于 2007-07-24 08:56:00
var n:integer;
procedure xing(b:integer);
var i,j:integer;
begin
for i:=1 to b do begin
for j:=1 to i do begin
write('*');
end;
writeln
end;
end;
begin
readln(n);
xing(n);
end.
送给你
13 楼
Lovely哆啦 [专家分：1360] 发布于 2007-07-24 08:58:00
你怎么还不懂呀？？
吐！！继续~~~~~~~~~~~~~~~~`
呀！！咋，越来越厉害呀！吐~~~~~~~~~~~~~~~~~~~~~`
14 楼
bigchen [专家分：1940] 发布于 2007-07-24 10:31:00
构造法解决
...........
15 楼
cmy28 [专家分：380] 发布于 2007-07-30 16:24:00
我也要吐了~~~~~~
16 楼
abcwuhang [专家分：1840] 发布于 2007-07-30 22:05:00
现在已经污秽横流了!
地上已经全被吐满了!
17 楼
cmy28 [专家分：380] 发布于 2007-07-30 22:27:00
………………
我来回复
您所在位置：社区首页 — PASCAL语言讨论区 — 007bond快过来!