Script kodingan :
program jum_bil;
uses wincrt;
var
i, jum,bil: integer;
begin
jum:=0; {inisialisasi}
for i:=1 to 5 do
begin
write(‘Masukkan Bilangan = ‘);readln(bil);
jum:=jum+bil;
end;
writeln(‘Jumlah Bilangan = ‘,jum);
end.
var
i, jum,bil: integer;
begin
jum:=0; {inisialisasi}
for i:=1 to 5 do
begin
write(‘Masukkan Bilangan = ‘);readln(bil);
jum:=jum+bil;
end;
writeln(‘Jumlah Bilangan = ‘,jum);
end.
Hasil analisa leksikalnya :
- IDENTIFIER : i,jum,bil
- RESERVED WORD : var, begin, crt, uses, for, to, do, write, readln dan writeln
- OPERATOR : , ; + = . ' ( )
- NILAI : 0,1,5
Penjelasan programnya :
program ini mempunyai 3 variabel yaitu i,jum,bil yang dideklarasikan ke integer. Dimana hasil dari jum = 0 dan i=1 sampai 5 inputannya dan akan di proses dengan cara jum + bil dengan hasilnya dari jum yang 0 tadi, dan di cetak.
Outputan programnya :
Masukkan Bilangan = 12
Masukkan Bilangan = 12Masukkan Bilangan = 12
Masukkan Bilangan = 12
Masukkan Bilangan = 12
Jumlah Bilangan = 60
Tidak ada komentar:
Posting Komentar