fork(1) download
  1. Do i =1,99
  2. If(mod(i,7).ne.0)print*,i
  3. Enddo
  4.  
  5. Stop
  6. End
Success #stdin #stdout 0s 5324KB
stdin
Standard input is empty
stdout
           1
           2
           3
           4
           5
           6
           8
           9
          10
          11
          12
          13
          15
          16
          17
          18
          19
          20
          22
          23
          24
          25
          26
          27
          29
          30
          31
          32
          33
          34
          36
          37
          38
          39
          40
          41
          43
          44
          45
          46
          47
          48
          50
          51
          52
          53
          54
          55
          57
          58
          59
          60
          61
          62
          64
          65
          66
          67
          68
          69
          71
          72
          73
          74
          75
          76
          78
          79
          80
          81
          82
          83
          85
          86
          87
          88
          89
          90
          92
          93
          94
          95
          96
          97
          99