Zivatar.hu Zivatar.hu Felhőtár
03. Számolj el 1-től 10-ig! (f77, xls) - Zivatar.hu

03. Számolj el 1-től 10-ig! (f77, xls)

Fortran program futtatása:

> ./f.sh elszamol

1
2
3
4
5
6
7
8
9
10

Forráskód:

      program elszamol
      integer i, n
      parameter(n=10)
      do i=1,n ! a ciklusvaltozo erteke minden korben eggyel nagyobb, mint elotte
          write(*,*) i ! kiirjuk az erteket
      enddo
      stop
      end

 


 

Excel eredmény:

1-től 10-ig feltöltött oszlop

VBA kód:

Sub Elszamol()
Dim i, n As Integer
n = 10
For i = 1 To n
    Cells(i, 1) = i ' feltolti a cellakat az i aktualis ertekevel
Next
End Sub

Szerző: MacGyver
Létrehozás: 2012-07-14

Név
E-mail cím
Honlapod címe (ha van)
Hozzászólás
Mennyi három meg három (betűvel)?

eXTReMe Tracker