LOGO

Minggu, 18 Desember 2011

program pascal huruf

Alhamdulillah,,, akhirnya final juga tugas UAS PIK ^__-

Ayo Belajar!!

program PASCAL-huruf vokal

program huruf_vokal;
uses wincrt;
var
data:char;
begin
readln(data);
case data of
'A','I','U','E','O':writeln('huruf besar vokal');
'a','i','u','e','o':writeln('huruf kecil vokal');
else writeln ('bukan huruf vokal');
end;
end.

0 komentar:

Posting Komentar