Срочно. Паскаль. Комментарии. Попроще. Желательно с циклом (пофиг каким). Вывести на экран все трехзначные числа, кратные 3.

begin

 Range(100, 999).Where(el -> el mod 3 = 0).Println;

end.