Помогите сделать номер 5

Помогите сделать номер 5

Задать свой вопрос
1 ответ

var

 i: Integer;

begin

 for i := 100 to 999 do begin

   if i mod 9 = 0 then

     Write (i, ', ');

 end;

end.

// если делится на 9, то на 3 тоже, потому 3 можно не инспектировать, или условие написать так:

if (i mod 9 = 0) and (i mod 3 = 0) then

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт