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

Написать программу выводящую на экран малое число больше 1000 которое делется на 189 паскаль

Задать свой вопрос
Ксюха Портенко
beginwriteln(1134)end.
1 ответ

program morethen1000;

var a:integer;

begin

 a:=1000;

 while a mod 189 lt;gt; 0 do

   a:=a+1;

 writeln(a);

end.

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


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

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

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

Войти на сайт