diff options
| author | Anton Šijanec <sijanecantonluka@gmail.com> | 2020-03-30 15:24:15 +0200 |
|---|---|---|
| committer | Anton Šijanec <sijanecantonluka@gmail.com> | 2020-03-30 15:24:15 +0200 |
| commit | 37fc0b25d852dba0ce7a329678c5c30a028be00f (patch) | |
| tree | 80e58fb4000efc4fcf3f7afccbda0f4a6a48f93b /SPACE.FOR | |
| download | ZVEZDE-37fc0b25d852dba0ce7a329678c5c30a028be00f.tar ZVEZDE-37fc0b25d852dba0ce7a329678c5c30a028be00f.tar.gz ZVEZDE-37fc0b25d852dba0ce7a329678c5c30a028be00f.tar.bz2 ZVEZDE-37fc0b25d852dba0ce7a329678c5c30a028be00f.tar.lz ZVEZDE-37fc0b25d852dba0ce7a329678c5c30a028be00f.tar.xz ZVEZDE-37fc0b25d852dba0ce7a329678c5c30a028be00f.tar.zst ZVEZDE-37fc0b25d852dba0ce7a329678c5c30a028be00f.zip | |
Diffstat (limited to 'SPACE.FOR')
| -rw-r--r-- | SPACE.FOR | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/SPACE.FOR b/SPACE.FOR new file mode 100644 index 0000000..d1713c7 --- /dev/null +++ b/SPACE.FOR @@ -0,0 +1,8 @@ + SUBROUTINE SPACE + write(*,*)'ENTER' + READ(*,*) + DO I=1,27 + WRITE(*,*) + ENDDO + RETURN + END |