Loogika ja programmeerimine
[ ]
=
[ ]
'END' 'FUNCTION' .
Näide:
FUNCTION Max ( a AS INTEGER, b AS INTEGER )
IF a > b THEN
Max = a
ELSE
Max = b
ENDIF
END FUNCTION
PARAMEETER
Enne, kui hakkan selgitama mõningaid mõisteid, esitan ma ühe keeles Pascal kirjutatud
näiteprogrammi, kus on kasutatud nii protseduure kui ka funktsioone koos parameetritega ja
ilma.
Ü l e s a n n e:
On antud N (<= 20) rea ja M (<= 20) veeruga arvumaatriks. Järjestada maatriksi read ja veerud
nii, et suurima summaga rida ja veerg oleksid vastavalt esimesel real ja veerul. Lubatud
operatsioonid on ridade vahetamine ja veergude vahetamine.
Program N9_1;
const
MaxN = 20;
Programmeerimise algkursus 70 - 89
MaxM = 20;
var { globaalsed muutujad }
T : array[1..MaxN, 1..MaxM] of Integer;
N, M : Integer;
{ Protseduur andmete sisestamiseks. }
procedure Sisestamine;
annaabi.ee 
