Pemograman Pascal : Menghitung jumlah masing-masing huruf vocal

Bebarapa minggu yang lalu saya mendapat tugas dari dosen yang kurang lebih soalnya seperti ini:

Buatlah program berikut :
1. menerima input sebuah teks
2. menghitung jumlah masing-masing huruf vocal
contoh :
'jurusan teknik elektro fakultas teknik'
a = 3
e = 4
i = 2
u = 3
o = 1

Sempat kebingungan buat mengerjakan tugas tersebut dan akhirnya saya putuskan buat googling. setelah muter-muter cari-cari akhirnya dapat sedikit petunjuk. dengan sedikit petunjuk itu akhirnya saya dapat menyelesaikan tugas tersebut.

Jawabannya sebagai berikut :

Tampilan setelah di run sama dengan di contoh :


Karena saya juga masih dalam pembelajaran jadi mohon maaf kalo ada kesalahan.
Semoga artikel ini bermanfaat bagi kita semua.