| Program Minibank;
Type Kontotype = (checkKonto, aktionærKonto, pensionsKonto,
gevinstKonto);
Bankkonto typedefinitioner;
Procedure som gennemfører transaktioner;
Function LaesKontotype: KontoType; begin ... end;
begin
while not fyraften
do begin
kt := LaesKontoType;
udfør en transaktion kontotype kt
end
end. |
|
| | Et simpelt (hoved)program, som iterativt læser en konto og dernæst udfører en transaktion på den.
De fremhævede dele af programmet er pseudoprogram, som forfines herefter. Vi ser hovedprogrammet af et meget simpelt bank program, som i en løkke indlæser en konto,
og dernæst udfører en bestemt transaktion på denne. Vi kan sige, at vi ser på toppen af dette program.
Samtidig er det vigtigt at bemærke, at det typisk er her vi starter udviklingen af programmet.
Når et program udvikles top-down startes med de overordnede dele af programmet,
og dele deraf forfines trinvis, indtil alle detaljer er fuldt ud implementeret. De
fremhævede dele af programmet er pseudoprogram (kommentarer), som vi vil forfine (videreudvikle)
på de følgende sider.
|