做个随机函数的程序题

下面给出 Turbo C 的源代码 和 Delphi 的源代码 以及一个运行结果示例.
(代码保证可以正常编译和运行)
(附送一个 Turbo C 的下载地址: http://www.skycn.com/soft/2151.html)

运行结果示例:

The Prime Numbers: (5)
283, 281, 271, 269, 239
The Other Numbers: (45)
204, 214, 205, 259, 242, 221, 209, 255, 236, 294, 237, 247, 225, 244, 284, 220, 235, 270, 243, 279, 256, 210, 252, 285, 275, 258, 290, 222,

296, 234, 291, 216, 287, 273, 289, 230, 238, 213, 295, 245, 298, 254, 224, 262, 231
Press <ENTER> to exit.

Turbo C 的源代码:
文件名:
PrimeNum.c

内容:

/*
用随机函数产生50个200—300之间的随机函数整数，选出其中的素数，并把这些素数，按由大到小的顺序排列！！！！！！
*/

#include "stdio.h"
#include "math.h"
#include "stdlib.h"

const
Lower = 200,
Upper = 300,
True = 1,
False = 0;

int PrimeNumbers[51];