Регистрация
Войти
Стать экспертом Правила
Информатика

составить программу для вывода на экран всех чисел делящих на 723 и меньших миллион

ОТВЕТЫ
Var A:integer;
Begin
A:=0;
While A<1000000 do
   Begin
   WriteLn(A);
   A:=A+723;
   End;
End.
740
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам