Ø LA 1
Uses crt;
Var a : string ;
Begin
Clrscr;
Writeln (’Hello World’);
Readln;
End.
- Output
Ø LA 2
Uses crt;
Var a, b , hasil: integer;
Begin
Clrscr;
Write (’Bilangan Penjumlahan’);
Writeln;
Write (’Masukkan Nilai 1 :‘); readln (a);
Write <’Masukkan Nilai 2 :’); readln (b);
Hasil:=a+b;
Write (‘Maka hasilnya adalah’, hasil);
Readln;
End.
Ø LA 3
Uses crt;
Var
a : integer ;
b : string ;
begin
clrscr ;
writeln (’Biodata’) ;
write (’Masukkan Nama anda:‘) ;readln (b);
write (’Masukkan NPM anda:’) ;readln (a);
write (’maka nama kamu adalah‘, b);
write (’dan NPM kamu adalah’, a);
readln;
end.
- Output
Keterangan:
1. uses crt; digunakan untuk memanggil fungsi-fungsi salah satunya clrscr; , gotoxy; dan lainnya
2. var a , b :integer; digunakan untuk mendeklarasikan adanya variabel yaitu variable a dan b dengan tipe data integer
3. begin digunakan untuk memulai statement yang akan di jalankan
4. clrscr; digunakan untuk membersihkan layar
5. writeln; digunakan untuk menampilkan data, dan setelah itu pindah baris baru
6. write; digunakan untuk menampilkan data, dan setelah itu tidak pindah baris
7. hasil :=a+b; merupakan statement yang digunakan untuk melakukan operasi aritmatik, dan di masukan ke dalam suatu variable yaitu variable hasil
8. readln(nama_var); digunakan untuk menginput nilai dari suatu variable
9. readln; digunakan untuk membreak sebelum program di keluarkan
10. end. digunakan untuk keluar dari program (selesai)
0 komentar:
Posting Komentar