-
Notifications
You must be signed in to change notification settings - Fork 0
/
Scanner.txt
38 lines (38 loc) · 1007 Bytes
/
Scanner.txt
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
program : program
hitung : Identifier
; : semicolon
var : varsy
c : Identifier
: : period
integer : typeint
; : semicolon
b : Identifier
: : period
integer : typeint
; : semicolon
a : Identifier
: : period
integer : typeint
; : semicolon
begin : beginsy
a : Identifier
: : period
= : egl
; : semicolon
b : Identifier
: : period
= : egl
; : semicolon
if : ifsy
( : lparent
a : Identifier
> : gtr
) : rparent
then : thensy
c : Identifier
: : period
= : egl
4 : Identifier / Integer
; : semicolon
end : endsy
. : colon