• Даны натуральные числа от 1 до 200. Найти тех из них которые делятся на 2 и на 3.

Ответы 3

  • var i: integer;begin i:=6; while i<200 do begin writeln('число = ',i); i:=i+6; end;end.
    • Автор:

      cain
    • 6 лет назад
    • 0
  • Pascal abc.Проверка6  12  18  24  30  36  42  48  54  60  66  72  78  84  90  96  102  108  114  120  126  132  138  144  150  156  162  168  174  180  186  192  198  
    answer img
  • Если число делится одновременно на 2 и на три, оно также делится на 2х3=6.Первое такое натуральное число - это 6. А дальше наращиваем числа на 6...// PascalABC.NET 3.0, сборка 1088var  i:integer;begin  i:=6;  while i<=200 do begin Write(i,' '); i:=i+6 endend.Результат выполнения программы:6 12 18 24 30 36 42 48 54 60 66 72 78 84 90 96 102 108 114 120 126 132 138 144 150 156 162 168 174 180 186 192 198
    answer img
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

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

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

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