|
|
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.