然後隨機讀取數組下標就可以我寫個隨機讀取
+
-
*
/的函數給妳,
妳自己調用就可以function
ReadSign:
Char;
const
Sign:
array[0..3]
of
Char
=
('+',
'-',
'*',
'/');
begin
Randomize;
Result
:=
Sign[Random(3)];
end;