• в трехзначном числе зачеркнули первую цифру слева когда полученное двузначное число уменьшили на 7, то получили данное число.Найти это число решить через бейсик

Ответы 1

  • 1 Var a,i:integer;2 begin3 for i:=100 to 999 do4 begin5 a:=i mod 100;6 if 7*a=i then writeln(i);7 end;8 End.

    • Автор:

      oscar95
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

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

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

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