| <DIV id=433><PRE>#!usr/bin/perl
#Bölme makinesi :D
print "Bolunecek sayiyi giriniz:
";
$ilksayi=<STDIN>;
chop($ilksayi);
print "Bolecek sayiyi giriniz.
";
$ikinci=<STDIN>;
chop($ikinci);
$sonuc = $ilksayi / $ikinci;
print "Sonuc = $sonuc
";
exit();
Devamını Görmek İçin Üye Girişi Yapmanız Gerekmektedir. | 
