• В лототроне по порядку лежат шары с номерами от 100 до 200. Он выбрасывает каждый седьмой. Составьте алгоритм на языке паскаль для определения номеров выпавших шаров. Обязательно цикл с предусловием.

Ответы 1

  • var  i:integer;begin  i:=100;  while (i+7<200) do begin    inc(i,7);    write(i,' ');  end;end.
    • Автор:

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

Войти через Google

или

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

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

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