struktur percabangan ada dua yaitu :
- if - then - else
- case - of
program inputan;
uses crt;
var
i:integer;
begin
write('masukkan bilangan antara 1-50:=');
readln(i);
if i<50 then
write('bilangan positif')
else
begin
write('bilangan negatif')
end;
readln;
end.
Tidak ada komentar:
Posting Komentar