Pastebin
API
tools
faq
paste
Login
Sign up
SHARE
TWEET
#5a page 133
Esraa_Amer
Jan 14th, 2013
77
0
Never
Add comment
Not a member of Pastebin yet?
Sign Up
, it unlocks many cool features!
Fortran
0.22 KB
| None
|
0
0
raw
download
clone
embed
print
report
DIMENSION
K
(
50
)
K
(
1
)
=
0
K
(
2
)
=
1
DO
10
I
=
3
,
50
K
(
I
)
=
K
(
I
-
2
)
+
K
(
I
-
1
)
10
CONTINUE
DO
20
J
=
1
,
50
SUM
=
SUM
+
K
(
J
)
20
CONTINUE
WRITE
(
*
,
*
)
SUM
PAUSE
STOP
END
Advertisement
Add Comment
Please,
Sign In
to add comment
Public Pastes
Crypto Method
CSS | 3 min ago | 0.25 KB
I made $2,000 in 20 minutes
CSS | 3 min ago | 0.25 KB
✅ API Glitch (Docs Leak)
CSS | 3 min ago | 0.25 KB
can use from puter.com desktop
18 min ago | 0.50 KB
Task Manager config
Lua | 13 hours ago | 1.32 KB
Adding Stripe invoice API param
18 hours ago | 0.70 KB
Asklepios Klinik Nord – Heidberg
1 day ago | 20.98 KB
2026_07_updated_july
1 day ago | 1.06 KB
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the
Cookies Policy
.
OK, I Understand
Not a member of Pastebin yet?
Sign Up
, it unlocks many cool features!
