Program_LuasPersegiPanjang
Deklarasi
Panjang: Integer
Lebar: Integer
Luas: Integer
Deskripsi
Begin
Read (Panjang, Lebar);
Luas=Panjang*Lebar;
Print Luas
End
Gambar 1.1 Luas Persegi
2. Algoritma menggunakan flowchart dan pseudocode untuk menghitung luas lingkaran.
Program_LuasLingkaran
Deklarasi
Phi: Integer
r: Integer
Luas: Integer
Deskripsi
Begin
Read (Phi, r);
Luas=Phi*r*r;
Print Luas
End
Gambar 2.1 Luas Lingkaran
3. Algoritma menggunakan flowchart dan pseudocode untuk menentukan bilangan yang diinputkan adalah bilangan ganjil atau genap.
Program_GanjilGenap
Deklarasi
Bil: Integer
Deklarasi
Begin
If Bil mod 2=0 then
Print "Bilangan Genap"
Else
Print "Bilangan Ganjil"
End If
End
Gambar 3.1 Bilangan Ganjil atau Genap
4. Algoritma menggunakan flowchart dan pseudocode untuk menginputkan 3
buah bilangan kemudian menentukan bilangan terbesar, terkecil, dan
rata-rata.
Program_BilTerbesar
Deklarasi
a: Integer
b: Integer
c: Integer
Deskripsi
Begin
IF a>b and a>c then
Print "a Bilangan Terbesar"
Else
IF b>a and b>c then
Print "b Bilangan Terbesar"
Else
Print "c Bilangan Terbesar"
End IF
End IF
End
Gambar 4.1 Bilangan Terbesar
Program_BilTerkecil
Deklarasi
a: Integer
b: Integer
c: Integer
Deskripsi
Begin
IF a<b and a<c then
Print "a Bilangan Terkecil"
Else
IF b<a and b<c then
Print "b Bilangan Terkecil"
Else
Print "c Bilangan Terkecil"
End IF
End IF
End
Gambar 4.2 Bilangan Terkecil
Program_Rerata
Deklarasi
a: Integer
b: Integer
c: Integer
Jumlah: Integer
Rerata: Integer
Deskripsi
Begin
Read (a, b, c);
Jumlah= a+b+c;
Rerata=Jumlah/3;
Print Rerata;
End
Gambar 4.3 Rata-rata 3 Bilangan
5. Algoritma menggunakan flowchart dan pseudocode untuk menghubungkan waktu yang diinputkan dari detik kesatuan jam dan menit.
Program_JamMenitDetik
Detik: Integer
Menit: Integer
Jam: Integer
Deskripsi
Detik: Integer
Menit: Integer
Jam: Integer
Deskripsi
Begin
Read (Detik);
Jam= Detik/3600;
Menit= Detik/60;
Print Jam;
Print Menit;
End 
Gambar 5.1 Detik Kesatuan Jam dan Menit
