From 37fc0b25d852dba0ce7a329678c5c30a028be00f Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Anton=20=C5=A0ijanec?= Date: Mon, 30 Mar 2020 15:24:15 +0200 Subject: initial commit --- SPACE.FOR | 8 ++++++++ 1 file changed, 8 insertions(+) create mode 100644 SPACE.FOR (limited to 'SPACE.FOR') 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 -- cgit v1.2.3