Posted by Materi Teknik Informatika • Informasi Teknologi Informasi • Digital Marketing on 9/20/2014
Program Kondisional;
uses crt;
var
jenis : char;
kelamin : string[20];
lagi : char;
begin
clrscr;
write('Masukan Jenis Kelamin L/P : ');readln(jenis);
if (jenis='L') or (jenis='l') then
kelamin:='Laki-Laki'
else
kelamin:='Perempuaan';
write('Jenis Kelamin Anda : ',kelamin);
readln;
end.
Berikut hasil output Program Kondisional Jenis Kelamin yang dihasilkan.