Задать вопрос Регистрация
Помочь другим

  • Вывести все трехзначные числа,которые делятся на свою первую цифру Пожалуйста,помогите

Ответы 2

  • 111,222,333,444,555,666,777,888,999,393,339,484,448,224,242,248,284,246,264их слишком много.подумай немножко

  • var

    first,i:integer;

    begin

    for i:=100 to 999 do

    begin

    first:=i div 100;

    if (i mod first)=0 then write(i+' ');

    end;

    end.

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

    • Автор:

      gisela
    • 7 лет назад
    • 0

  • Добавить свой ответ

Еще вопросы

Топ пользователей

Войти через Google

 или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years