projects
/
h316.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
*** empty log message ***
[h316.git]
/
programs
/
first-steps
/
src
/
muz.f
diff --git
a/programs/first-steps/src/muz.f
b/programs/first-steps/src/muz.f
index 3935cc3cf2a3053a6d5b9278c041e35ac359d6ed..339ebaceed6962d12a3ae30a0368a409628cd5d6 100644
(file)
--- a/
programs/first-steps/src/muz.f
+++ b/
programs/first-steps/src/muz.f
@@
-5,9
+5,9
@@
CCCCCC DA SAG ICH NUR: LASS KRACHEN!
33 WRITE(1,10)
WRITE(2,20)
WRITE(4,30)
33 WRITE(1,10)
WRITE(2,20)
WRITE(4,30)
- 10 FORMAT(
54HHALLO WELT! DAS SOLLTE AUF DEM ASR RAUSGEKOMMEN SEIN!
)
- 20 FORMAT(
54HHALLO WELT! DAS SOLLTE AUF DEM PTP RAUSGEKOMMEN SEIN!
)
- 30 FORMAT(
54HHALLO WELT! DAS SOLLTE AUF DEM LPT RAUSGEKOMMEN SEIN!
)
+ 10 FORMAT(
3HASR
)
+ 20 FORMAT(
3HPTP
)
+ 30 FORMAT(
3HLPR
)
PAUSE
GOTO 33
$0
PAUSE
GOTO 33
$0