Elementary cellular automaton/Random number generator: Difference between revisions
Content added Content deleted
m (→{{header|Pascal}}: make ist comparable to D two million tests) |
|||
Line 308: | Line 308: | ||
=={{header|Pascal}}== |
=={{header|Pascal}}== |
||
{{Works with|Free Pascal}} |
{{Works with|Free Pascal}} |
||
Use 32-Bit assembler for speed like in Delphi-forum years ago.Sometimes it helps.<BR>Speedtest |
Use 32-Bit assembler for speed like in Delphi-forum years ago.Sometimes it helps.<BR>Speedtest like in D [http://rosettacode.org/wiki/Elementary_cellular_automaton/Random_Number_Generator#D] with 8x2E6 calls. |
||
<lang pascal>Program Rule30; |
<lang pascal>Program Rule30; |
||
//https://www.entwickler-ecke.de/viewtopic.php?t=111812 |
//https://www.entwickler-ecke.de/viewtopic.php?t=111812 |