求质数的dc程序

Roc.Ken

UID: 11395
帖子: 173
积分: 397
在线时间: 1 天 17 小时

1^# Roc.Ken 发表于 2004-07-24 01:12

求质数的dc程序

echo '2p3p[dl!d2+s!%0=@l!l^!<#]s#[s/0ds^]s@[p]s&[ddvs^3s!l#x0<&2+l.x]ds.x'|dc

完全看不懂 :eek:　　　　　　

dearvoid

UID: 41384
帖子: 4
积分: 9
在线时间: 10 分钟

2^# dearvoid 发表于 2004-07-26 08:40

看不懂, either
回去研究研究　　　　　　

xiaoyafeng

UID: 44542
帖子: 17
积分: 39
在线时间: 10 分钟

3^# xiaoyafeng 发表于 2004-07-26 11:54

汗一个,看不懂　　　　　　

ServerOnly

UID: 9246
帖子: 153
积分: 351
在线时间: 1 天 8 小时

4^# ServerOnly 发表于 2004-07-26 12:25

我连dc 都没有...　　　　　　

dearvoid

UID: 41384
帖子: 4
积分: 9
在线时间: 10 分钟

5^# dearvoid 发表于 2004-07-26 15:46

求素数的那个还没有看明白, 不过我会计算前 100 个正整数的和了:

复制内容到剪贴板

代码:

dc -e '1sa0[lad1+sa+la100!<.]s.l.xp'

dearvoid

UID: 41384
帖子: 4
积分: 9
在线时间: 10 分钟

6^# dearvoid 发表于 2004-07-26 17:03

还没看懂, 不过完善了一下, 可以指定上限, 比如找区间 [1, 100] 内的素数:

复制内容到剪贴板

代码:

% dc -e '2p3p[dl!d2+s!%0=@l!l^!<#]s#[s/0ds^]s@[p]s&[q]s*[ddvs^3s!l#xd[color=red]100[/color]<*0<&2+l.x]ds.x'
2
3
5
7
11
13
17
19
23
29
31
37
41
43
47
53
59
61
67
71
73
79
83
89
97
%

dearvoid

UID: 41384
帖子: 4
积分: 9
在线时间: 10 分钟

7^# dearvoid 发表于 2004-08-05 08:59

唉, 大家对新生事物的兴趣总是不大

Roc.Ken

UID: 11395
帖子: 173
积分: 397
在线时间: 1 天 17 小时

8^# Roc.Ken 发表于 2004-08-05 10:32

[QUOTE]最初由 dearvoid 发布
[B]唉, 大家对新生事物的兴趣总是不大

[/B][/QUOTE]

打基础先.这些了解下子, 留下来以后再研究　　　　　　

飞灰橙

UID: 2976
帖子: 2
积分: 4
在线时间: 10 分钟

9^# 飞灰橙发表于 2004-08-20 13:50

汗，非人性化语言！　　　　　　

hb12112

UID: 16804
帖子: 155
积分: 356
在线时间: 1 天 9 小时

10^# hb12112 发表于 2004-08-28 01:07

郁闷啊,赞成楼上意见~!　　　　　　