Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #!/usr/bin/perl
- for (my $angka=1; $angka <= 100; $angka++) {
- if ($angka != 8 && $angka != 9 && $angka != 10 && $angka != 12) {
- print $angka,", ";
- }
- }
- print "\n";
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement