#!/usr/bin/perl

OUTER:
for (my $i = 20; ; $i += 20) {
    foreach (my $j = 1; $j < 20; $j++) {
        next OUTER if ($i % $j);
    }
    print "Number: $i\n";
    last;
}

##</code><code>##

#include <stdio.h>

int main(void) {
    int i, j;

    for (i = 20; ; i += 20) {
        for (j = 1; j < 20; j++) {
            if (i % j)
                break;
        }
        if (j == 20) {
            printf("Number: %d\n", i);
            break;
        }
    }

    return 0;
}