Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
নাজমুন নাহার
PROGRAM CHAR IMPLICIT NONE CHARACTER(50)::A="UOY EVOL I ",B INTEGER::N,I B=A N=LEN(TRIM(A)) DO I=1,N B(I:I)=A(N+1-I:N+1-I) END DO PRINT*,B(1:10),' ','NAJMUN NAHAR' PRINT*,'see translation' PRINT*,' আমি নাজমুন নাহারকে ভালবাসি' END PROGRAM CHAR
run
|
edit
|
history
|
help
0
Sffgg
testcompiler.f90
55
Fib series
Regression
Title
Y
hello world
1
recursive factorial