вычитать из x и y пока x не станет равен 200

Вычитать из x и y пока x не станет равен 200 , если x=1000000 , y=100

Задать свой вопрос
1 ответ
Program ggg;var x,y: integer;beginx:= 1000000;y:= 100;while xgt;=200 do writeln(x-y);end.

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт