Excel_VBA_manual

oj = FreeFile()
Open "C:\izlazpod.txt" For Output As #broj
Write #broj, n
Write #broj, m
For i = 0 To n - 1
For j = 0 To m - 1
Write #broj, a(i, j)
Next j
Next i
Close #broj
End Sub
U datoteci "izlazpod.txt" prvi podatak je vrijednost n (broj redova), drugi podatak je m (broj
stupaca), a zatim slijede podaci polja koji su smješteni jedan ispod drugog.(Sl. 4.2.2)
Sl. 4.2.2 Ispis podataka u datoteku
Nakon što su podaci ispisani u tekstualnu datoteku, pokreće se izvršna .EXE datoteka ovisno o
vrsti sortiranja. Ako je sortiranje od većih prema manjim brojevima pokreće se datoteka veci.exe,
a u drugom sluĉaju datoteka manji.exe.
Programi su napisani kao konzolne aplikacije i koriste metodu ljusaka (shells) za sortiranje niza.
Izvorni kod (source) programa manji.cpp glasi:
#include
#include
#include
#include
#pragma hdrstop
#define NMAX 450
FILE *stream;
49