[ForTran 2] Integer Arithmetic Operation
program integer arithmetic
write(*,*)'Enter two integers :'
read(*,*)i,j
iplusj=i+j
iminusj=i-j
iXj=i*j
ibyj=i/j
ipowerj=i**j
write(*,*)i,'+',j,'=',iplusj
write(*,*)i,'-',j,'=',iminusj
write(*,*)i,'X',j,'=',iXj
write(*,*)i,'/',j,'=',ibyj
write(*,*)i,'^',j,'=',ipowerj
end