Perl - P°φklad 3
5. listopadu 1998 xskrivan@fi.muni.cz


Zadßnφ

NapiÜte program, kter² vyzve u₧ivatele, aby zadal prom∞nnou A, a na v²stupu dß hlßÜku o tom, zda-li zadanß prom∞nnß je/nenφ menÜφ ne₧ Φφslo 100.

╪eÜenφ

 #!/usr/bin/perl

 print "Zadej prom∞nnou a: \n";
 $a = <STDIN>;
 if ( $a < 100 ) {
  print "Prom∞nnß a je menÜφ ne₧ 100 \n";
}
else {
  print "Prom∞nnß a nenφ menÜφ ne₧ 100 \n";
}




[Zp∞t] [Zm∞na k≤dovßnφ] [Domovskß strßnka] á[StromeΦek]