Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
Palindromic number
!gfortran, gcc version 7.4.0 program hello implicit none integer::n=452,i,r,num=0,q q=n; do while(q>0) r=mod(q,10); num=num*10+r; q=q/10; end do print'(A30,2x,I5)','Reverse Ordered Number Is : ',num if(num==n)then print'(25x,A25)','~ Number Is Palindromic' else print'(25x,A30)','~ Number Is Not Palindromic' end if end program hello
run
|
edit
|
history
|
help
0
Yegon Japheth tries out Fortran,
y
Practice am4
problem_3
A_04 GUASSIAN QUADRATURE METHOD
Quardratic equation solve
রাবেয়া সরকার রিমা 💙💚💛
A_01 SECANT_METHOD
first
Shooting P1