|
|
1.1 ! root 1: program com ! 2: common /x/a,b,c,d ! 3: integer result,a,b,c,d ! 4: a=2 ! 5: b=3 ! 6: c=4 ! 7: d=5 ! 8: result=a*b+c*d ! 9: print*,result ! 10: stop ! 11: end
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.