源码文件
; Chapter04Sum1000.pro PRO Chapter04Sum1000 sum = 0L i = 1 WHILE i LE 1000 DO BEGIN sum = sum + i i++ ENDWHILE …
Basic Pro 源代码
汇集 Basic Pro 相关的电路原理图、PCB工程文件、单片机/FPGA源代码、数据手册与应用设计方案。
收录资源 500 份
全站深度检索
共匹配 500 份工程资源
· 第 49 / 50 页
源码文件
; Chapter04TestRunTime1.pro PRO Chapter04TestRunTime1 MyVariable = DIST(1000, 1000) Sum = 0.0 StartTime = SYSTIME(/SECON…
源码文件
; Chapter04Factorial09.pro PRO Chapter04Factorial09 FOR i = 0, 9 DO BEGIN PRINT, i , " ! = ", MyFactorial ( i ) E…
源码文件
Domains list=integer* array=list* Predicates append(list,array,array) member(list,array) fill(integer,integer,integer,i…
源码文件
domains int=integer mylist=integer * predicates primes(int,mylist) integers(int,int,mylist) test(mylist,mylist) remov…
源码文件
domains int=integer mylist=integer * predicates primes(int,mylist) integers(int,int,mylist) sift(mylist,mylist) remov…
源码文件
/**************************************************/ /* TOWERS OF HANOI */ /* ====…
源码文件
constants l="left column" m="center column" r="right column" predicates hanoi(integer) move(integer,string,string,strin…
源码文件
predicates solve(real,real,real) reply(real,real,real) mysqrt(real,real,real) equal(real,real) clauses solve(A,_,_):-…
源码文件
predicates require(real,real,real) reply(real,real,real) clauses require(A,_,_):-A=0,!, write("A inputing is wr…