Napisati program sa procedurama za ispis 'Limun', 'Kivi', 'Limun'.

Listing programa:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
PROGRAM Voce;
USES
  WinCrt;
PROCEDURE Prvi;
BEGIN
  Writeln('Limun');
END;
 
PROCEDURE Drugi;
BEGIN
  Writeln('Kivi');
END;
 
BEGIN       {MAIN}
  Prvi;
  Drugi;
  Prvi;
END.
 
Ispis na ekranu:
Limun
Kivi
Limun

Index