PROGRAM ARITMATIKA;
USES CRT;
VAR A,B,C,D,E,F : INTEGER ;
G : REAL;
BEGIN
CLRSCR;
A:=20;
B:=60;
C:=30;
D;=A+B;
E:=C-A;
F:=A*B;
G:=B/A;
WRITELN (‘HASIL DARI PERTAMBAHAN A DAN B=’, D);
WRITELN (‘HASIL DARI PENGURANGAN C DAN A=’, E);
WRITELN (‘HASIL DARI PERKALIAN A DAN B=’ , F);
WRITELN (‘HASIL DARI PEMBAGIAN A DAN B=’ , G:3:0);
READLN;
END.
Scaning :
a. Keyword :
- USES CRT
- VAR
- INYEGER
- REAL
- BEGIN
- CLRSCR
- WRITELN
- READLN
- END
b. Identifier :
- PROGRAM ARITMATIKA
- A,B,C,D,E,F,G
- HASIL DARI PERTAMBAHAN A DAN B=
- HASIL DARI PENGURANGAN C DAN A=
- HASIL DARI PERKALIAN A DAN B=
- HASIL DARI PEMBAGIAN A DAN B=
c. Punctaution
- (;)
-(,)
- (.)
d. Operator :
- (+)
- (-)
- (*)
- (/)
- (=)
Tidak ada komentar:
Posting Komentar